Procedure GetTime (Var Hour,Minute, Second : Word) ;
Returns the current time of the day.
None
GetEpochTime, GetDate, EpochToLocal
Program Example5; { Program to demonstrate the GetTime function. } Uses linux; Var Hour, Minute, Second : Word; begin GetTime (Hour, Minute, Second); Writeln ('Time : ',Hour:2,':',Minute:2,':',Second:2); end.