Decodetime, Tdatetime

[marcoszorrilla]

TDateTime es un tipo de dato que almacena la fecha y hora como su nombre indica

y DecodeTime permite extraer la hora de una variable tipo TDateTime.

Código Delphi [-]
Var
procedure TForm1.Button1Click(Sender: TObject);
Var
MiHora:TDateTime;
hh,mm,ss,ms:Word;
begin
MiHora:=Now;
DecodeTime(MiHora,hh,mm,ss,ms);

ShowMessage('La hora es:'+IntToStr(hh));
ShowMessage('Minutos:'+IntToStr(mm));
//etc..
end;