Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как перевести секунды в DateTime? [D7, WinXP]


cvg ©   (2005-08-11 18:09:00) 

Сабж. Когда из DateTime в секунды переводил, пользовался функцией SecondsOfTheDay.


Jeer   (2005-08-12 10:37:00) [1]

Antonn ©   (11.08.05 19:41) [3]

Я по всякому пойму.:)


Marser   (2005-08-11 22:21:00) [2]

SecondsBetween etc
uses DateUtils


Antonn   (2005-08-11 19:41:00) [3]

Jeer ©   (11.08.05 18:25) [2]
вах, так много текста...:)

dt: TDateTime;
dt := секунды/86400;


Jeer   (2005-08-11 18:25:00) [4]

А подумать ?

sec: integer;
fsec: double;
dt: TDateTime;

fsec := sec;
fsec := fsec/(24*60*60);
dt := TDateTime(fsec);


troits   (2005-08-11 18:16:00) [5]

Если имеется в виду перевод в формат TDateTime, то есть ф-ция в sysutils

function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;


Наверх

Титульная страница Поиск, карта сайта Написать письмо