tdatetime



Delphi текущая дата и время

Автор Eivaz задал вопрос в разделе Другие языки и технологии

Как в Delphi 7 посчитать время и получил лучший ответ

Ответ от Ў В[гуру]
1. Тип данных Дата-Время. Функции преобразования
Тип дата-время определяется идентификатором TDateTime и предназначен для одновременного хранения и даты, и времени. Во внутреннем представлении он занимает 8 байт и, подобно Currency, представляет собой вещественное число с фиксированной дробной частью: в целой части числа хранится дата, в дробной - время. Да¬та определяется как количество суток, прошедших с 30 декабря 1899 года, а время - как часть суток, прошедших с 0 часов, так что значение 35977,4793 соответствует дате 1.07.1998 и времени 11:30. Количество суток может быть и отрицательным, однако значения, меньшие -693594 (соответствует дате 00.00.0000 от Рождества Хри¬стова) , игнорируются функциями преобразования даты к строковому типу.
Над данными типа TDateTime определены те же операции, что и над вещественными числами, а в выражениях этого типа могут участвовать константы и переменные целого и вещественного типов. Для работы с датой и временем используются функции, перечисленные в таблице:
Функция Назначение
Date(): TDateTime; Возвращает текущую дату.
DateToStr(D : TDateTime): String; Преобразует дату в строку символов.
DateTimeToStr(D: TDateTime): String;Преобразует дату и время в строку символов.
Time(): TDateTime; Возвращает текущее время.
TimeToStr(T: TDateTime): String; Преобразует время в строку.
Поскольку тип TDateTime совместим с форматом вещественных чисел, можно без труда определить дату, отстоящую от заданной на сколько-то дней вперед или назад: для этого достаточно соответственно прибавить к заданной дате или отнять от нее нужное целое число. Например, оператор
IbOutput.Caption := DateToStr(Date + 21);
поместит в метку IbOutput дату, соответствующую текущей дате плюс 3 недели. Чуть сложнее с исчислением времени. Например, чтобы добавить к текущему времени полтора часа, следует использовать выражение
Time + StrToTime('1:30')
или
Time+1.5/24
2. Процедура и функции для работы с датами.
Функция NOW – возвращает дату и время текущего момента, разумеется, по системному времени. Параметров не имеет.
Процедура DecodeDate(Date, Year, Month, Day) – раскладывает дату на составляющие – год, месяц, день.
Параметр Date имеет тип дата-время, параметры Year, Month, Day - целочисленный тип word.
Функция EncodeDate(Year, Month, Day) – возвращает дату, созданную из указанных чисел. Разумеется, если такая дата существует. В противном случае будет сообщение об ошибке.
Параметры Year, Month, Day - целочисленный тип word.
Мне кажется, этого достаточно.

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Как в Delphi 7 посчитать время
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*