datum splitten - in stunden, minuten, sekunden

[Luckie]

Geht:

Delphi-Quellcode:

uses
  DateUtils;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(HourOf(now)));
end;

HourOf gibt einen Integer zurück und keinen Wert vom Typ TTime. Die Hilfe ist schon manchmal recht lehrreich.