Подскажите пожал. есть ли какая фунуция преобразующая дату в integer (float) и наоборот?
Как это делатся с помощью прибавления / вычитания от 30.12.1899 я знаю.
Хочется стандартный простой способ....
Спасибо.
Posted via RSDN NNTP Server 2.0
Здравствуйте, URA_12, Вы писали:
URA>Подскажите пожал. есть ли какая фунуция преобразующая дату в integer (float) и наоборот?
URA>Как это делатся с помощью прибавления / вычитания от 30.12.1899 я знаю.
URA>Хочется стандартный простой способ....
URA>Спасибо.
Если тебя не интересует время в дате, то просто:
IntDate := trunc(FloatDate);
И наоборот:
FloatDate := IntDate;
Здравствуйте, URA_12, Вы писали:
URA>Подскажите пожал. есть ли какая фунуция преобразующая дату в integer (float) и наоборот?
А просто присвоить не пробовали? DateTime и так является числом.
uses System;
TDateTime = type Double;
Здравствуйте, URA_12, Вы писали:
URA>Подскажите пожал. есть ли какая фунуция преобразующая дату в integer (float) и наоборот?
URA>Как это делатся с помощью прибавления / вычитания от 30.12.1899 я знаю.
URA>Хочется стандартный простой способ....
Если я вас правильно понял — речь идет о типе TDateTime? Коли так, то это и есть тип Double целая чать которого количество дней от 30.12.1899, а дробная часть от 24 часов.
А теперь о стандатрных способоах F1 это самый стандартный
, а также смотрим help по ключевым словам: SysUtils, DateUtils, тьма различных функций.
URA>Спасибо.
Пожалуйста.
