
11.01.2011, 17:43
|
 |
I Like it!
|
|
Регистрация: 12.12.2009
Адрес: Россия, г. Новосибирск
Сообщения: 663
Версия Delphi: D6/D7
Репутация: 26643
|
|
Вы ж сами все написали: seconds since midnight, Jan. 1, 1904, in UTC time - то бишь +секунд от полуночи от 1 янаваря 1904 года.
Код:
var
d: TDateTime;
a: Integer;
begin
d := EncodeDateTime(1904, 1, 1, 00, 00, 00, 00);
d := IncSecond(d, $C939544C);
ShowMessage(DateTimeToStr(d));
end;
Обратите внимание на порядок байт.
__________________
Грамотно поставленный вопрос содержит не менее 50% ответа.
Грамотно поставленная речь вызывает уважение, а у некоторых даже зависть.
|