fpc/docs/datutex/ex2.pp
2004-12-29 15:16:37 +00:00

9 lines
154 B
ObjectPascal

Program Example2;
{ This program demonstrates the TimeOf function }
Uses SysUtils,DateUtils;
Begin
Writeln('Time is : ',TimeToStr(TimeOf(Now)));
End.