![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сравнение времени функции 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