Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

преобразовать в дату [D6, XP]

Marat © (2006-12-27 07:04:00)
В одном из файлов есть поле Timestamp = 1157047914
Мне необходимо преобразовать данную переменную в вид:
"01.09.2006 06:16:58" asDateTime для записи в MS SQL (поле DateTime)

Anatoly Podgoretsky (2006-12-27 18:45:00) [1]
> Marat (27.12.2006 7:04:00) [0]

UnixToDateTime

Marat (2006-12-27 11:07:00) [2]
Спасибо большое! Все получилось!

icWasya (2006-12-27 09:52:00) [3]
Скорее всего TimeStamp - это количество секунд, прошеднее с 01.01.1970,
а TDateTime - это количество суток с 01.01.1900.

формулы пересчёта TDateTime = TimeStamp/86400+25569

Но цыфры Вы привели правильные?
У меня получается, что "01.09.2006 06:16:58" - это 1157091418,
а 1157047914 - это "31.08.2006 18:11:54"

Marat (2006-12-27 08:01:00) [4]
я считываю эту переменную из текстового файла и получаю:
a: integer;
...
a:=strtoint(trim(SG.Cells[5,0]));

MBo (2006-12-27 07:28:00) [5]
TimeStampToDateTime
хотя Timestamp - это запись

type
TTimeStamp = record
Time: Integer; { Number of milliseconds since midnight }
Date: Integer; { One plus number of days since 1/1/0001 }

end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »