Справочник функций и процедур Delphi: TDateTime

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

TDateTime
Тип
Тип данных содержащий значение даты и времени System unit
  type TDateTime = type Double;


Описание
Тип TDateTime содержит значение даты и времени.

Она сохраняется как переменная Double, с датой как целая часть, а время как дробная. Дата сохраняется как число дней с 30 декабря 1899. Не понятно, почему не 31 декабря. 01 января 1900 имеет значение 2.

Поскольку TDateTime фактически является Double, то вы можете выполнять над ним вычисления, как будто это было число. Это очень полезно для вычислений типа разницы между двумя датами.
Примечания
Никакая информация местного времени не содержится в TDateTime - только значения времени и дня.
Похожие команды
DateTimeToFileDate  Преобразует значение TDateTime в формат date/time формат файла

DateTimeToStr  Конвертирует значение даты и времени TDateTime в строку

DateTimeToString  Огромные возможности форматирования даты в строку

PDateTime  Указатель на значение TDateTime

StrToDateTime  Конвертирует строку с датой и временем в значение типа TDateTime

 
Пример кода : Обнаружение различия между двумя датами
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
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2022 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте   Facebook   Ссылка на Twitter   Ссылка на Telegram