| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Алгоритм перевода даты из LINUX в DOS формат [D5, Win95/98]
Sergey13 © (2002-02-05 10:43:00)Собственно сабж. Как?
Sergey13 (2002-02-05 11:35:00) [1]>Не совсем понятно, что такое DOS формат
Ну дык в DOSе и в UNIXе даты хранятся по разному.
Спасибо за пример, шас поурчу над этим.
McSimm (2002-02-05 11:05:00) [2]Не совсем понятно, что такое DOS формат, но вот алгоритм для TDateTime: (взято из стандартных функций D6)
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;
| |
