Hour: Integer;
The Hour property returns the number of hours from the current variable.
Sub Main;
Var
DT: DateTime;
i: Integer;
Begin
DT := DateTime.Now;
i := DT.Hour;
End Sub Main;
After executing the example the "i" variable will contain the number of hours of the current time.
See also: