Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.08;
Скачать: CL | DM;

Вниз

преобразование Unix времени   Найти похожие ветки 

 
andwcomm ©   (2002-06-25 18:43) [0]

Как преобразовать Unix формат даты в TdateTime
Пример (1017679202) -> пн. 1 апр 2002 19:40:02


 
McSimm ©   (2002-06-25 18:45) [1]

const
UnixDateDelta = 25569;
SecsPerDay = 24 * 60 * 60;

function DateTimeToUnix(const AValue: TDateTime): Int64;
begin
Result := Round((AValue - UnixDateDelta) * SecsPerDay);
end;

function UnixToDateTime(const AValue: Int64): TDateTime;
begin
Result := AValue / SecsPerDay + UnixDateDelta;
end;


 
Malder ©   (2002-06-25 18:49) [2]

Надо в UBPFD добавить...



Страницы: 1 вся ветка

Текущий архив: 2002.07.08;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.018 c
14-23764
Layroot
2002-06-05 20:28
2002.07.08
Научите работать пожалуйста с компонентом vclzip!!!


14-23747
esprit_bel
2002-06-06 10:00
2002.07.08
Зрение


3-23511
Romank
2002-06-14 17:26
2002.07.08
Problem with calculated field


3-23476
Wassily
2002-06-15 20:26
2002.07.08
Как создать базу данных?


14-23769
Igorek
2002-06-06 00:15
2002.07.08
Собратья, нарисуйте идеальную машину для разработки