[現在の日付と時刻を取得する]

現在のシステム日付/時間を取得します。
【ソースコード】 [tips0034.pas]
program tips0034;
{$APPTYPE CONSOLE}
uses SysUtils;
begin
 //日付と時刻
 WriteLn('現在の日付と時刻は ',DateTimeToStr(now));
 //日付だけ
 WriteLn('現在の日付は ',DateToStr(Date));
 //時刻だけ
 WriteLn('現在の時刻は ',TimeToStr(Time));
end.
【コンパイル&実行】 [tips0034.bat]
dcc32 tips0034.pas 
tips0034.exe  > tips0034.txt
pause
【実行結果】 [tips0034.txt]
現在の日付と時刻は 2009/06/29 19:50:38
現在の日付は 2009/06/29
現在の時刻は 19:50:38