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

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

Сравнение времени функции TDateTime


ZV ©   (2010-11-23 20:32:00) 

Ситуация такая - происходит событие при котором записываются данные и к этим данным присваивается текущее время (Time) затем происходит следующие событие и вот тут должно происходить сравнение предыдущего времени записи данных с настоящим и если разница больше 20 секунд то записать новые данные. Так вот как сравнить два параметра Time ,чтобы определить прошло 20 сек или нет?
мне надо что то типа такого

событие А;
begin
..............;
..............;
..............;
clock[rq].intime:=Time;
end;

событие В;
begin
if (clock[rq].intime+20)<time then
begin
...........;
...........;
...........;
clock[rq].intime:=Time;
end;


Поскажите пожалуйста как мне это сделать правильно


И. Павел   (2010-11-23 22:23:00) [1]


> clock[rq].intime:=Time;

ИМХО тут лучше использовать не Time а Date, чтобы не было глюка в полночь. Хотя, конечно, можно и просто отдельно обрабатывать ситуацию, когда clock[rq].intime > Time.


И. Павел   (2010-11-23 21:04:00) [2]

abs(time - clock[rq].intime) < 20/60/60/24


Сергей М.   (2010-11-23 20:39:00) [3]

F1 -> SecondsBetween


Наверх

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