FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Calculos horarios
Hola a todos
necesito que me indiqueis como puedo trabajar con horas y realizar calculos horarios ya que no consigo que me salgan. Yo introduzco los datos mediante un edit y luego convierto los datos a numero y realizo las operaciones para calcular la diferencia horaria entre dos horas que he introducido, pero me da un error. Sabeis como podria hacerlo? Gracias. |
#2
|
|||
|
|||
Hola Telemaco, aqui tienes un pequeño ejemplo de como se restan dos horas distintas.
Código:
procedure TForm1.BitBtn1Click(Sender: TObject); var fecha1,fecha2:Tdatetime; horas:string; begin fecha1:=strtoTime('13:00:00'); Fecha2:=strtoTime('14:00:00'); horas:=timetostr(fecha2-fecha1); edit1.text:=horas; end; espero que te sirva. un saludo. |
#3
|
|||
|
|||
gracias, acabo de probarlo y va bien.
|
|
|
|