Delphi тип TDateTime – тип даних, що містить значення дати та часу.
System unit
type TDateTime = type Double;
Тип TDateTime містить значення дати та часу.
Вона зберігається як змінна Double, з датою як ціла частина і часом як дробова. Дата зберігається як число днів з 30 грудня 1899 року. Не зрозуміло, чому не 31 грудня. 01 січня 1900 року має значення 2.
Оскільки TDateTime фактично є Double, то ви можете виконувати над ним обчислення, начебто це було число. Це дуже корисно для обчислень різниці між двома датами.
Примітка.
Ніяка інформація місцевого часу не міститься в TDateTime – тільки значення часу та дня.
Тип TDateTime в Delphi: Виявлення різниці між двома датами
var
day1, day2 : TDateTime;
diff : Double;
begin
day1 := StrToDate('12/06/2002');
day2 := StrToDate('12/07/2002');
ShowMessage('day1 = '+DateToStr(day1));
ShowMessage('day2 = '+DateToStr(day2));
diff := day2 - day1;
ShowMessage('day2 - day1 = '+FloatToStr(diff)+' days');
end;Результат
day1 = 12/06/2002
day2 = 12/07/2002
day2 - day1 = 30 days
Подібні функції, процедури та команди
DateTimeToFileDate — перетворює значення TDateTime у формат date/time формат файлу.
DateTimeToStr — конвертує значення дати та часу TDateTime у рядок.
DateTimeToString — величезні можливості форматування дати в рядок.
PDateTime — покажчик на значення TDateTime.
StrToDateTime — конвертує рядок з датою та часом на значення типу TDateTime.
Пригостити автора кавою