resta horas y minutos

[botones67]

Hola a todos, y gracia anticipadas.

Quisiera saber si existe alguna funcion en delphi6 para restar franjas horarias.

por ejemplo .. introducir la hora y minutos del inicio y la hora y minutos de la finalizacion de una jornada laboral, Y SABER CUANTAS HORAS Y MINUTOS SE HACEN EL DICHA JORNADA.


lo dicho Gracias anticipadas.

[email protected]

[jafl1965]

Hola:
Te debe servir utilizar el procedimiento

DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word);

saludos,

[botones67]

perdona mi ignorancia.....

me puedes poner un ejemplo, no entiendo muy bien los parametros.

Yo tengo 4 variables

v1=hora de inicio de jornada
v2= minutos de inicio de jornada

v3 = hora de finalizacion de jornada
v4= Minutos de finalizacion

Como implemento estos parametos en decodetime?


GRACIAS OTRA VEZ....

[__cadetill]

a ver asi

 
var DifH, DifM, DifS, DifMs : Word;
begin
   DecodeTime(EncodeTime(v3, v4, 0, 0) - 
             EncodeTime(v1, v2, 0, 0), DifH, DifM, DifS, DifMs);
end;

De todas maneras, ten presente el que pueda haber un cambio de dia (o sea, que se hayan olvidado alguna fichada)

Espero te sirva

[botones67]

muchisimas gracias... eres todo un puntazo....