DateToStr
Модуль: SysUtils
function DateToStr(DateTime: TDateTime): String;
Преобразует дату, сохраненную как TDateTime, в строку String .
|
1 2 3 4 5 6 7 8 9 10 11 12 13 |
program FooBar; uses Dialogs, SysUtils; var Data : TDateTime; begin ShowMessage(DateToStr(Data)); Data := 654654; ShowMessage(DateToStr(Data)); end. |