Модуль: SysUtils

Описание
Функция возвращает значение текущей даты и времени в формате TDateTime.

Пример
begin
   MessageDlg( DateTimeToStr(Now), mtInformation, [mbOk], 0);
end;