Скачать: CL | DM;

Действие по расписанию.   Найти похожие ветки 

← →
Ш-К   (2003-05-11 02:11) [0]

Как запустить свою процедуру строго в полночь.
Есть ли специальные инструменты для этого?
ТTimer может перепрыгнуть через 00:00, и я момент не поймаю.
И не дергать же таймер целые сутки!
А без таймера как?

---

← →
Нуу   (2003-05-11 02:45) [1]

> ТTimer может перепрыгнуть через 00:00, и я момент не поймаю.

Но Date изменится в этот момент! А таймер, который проверяет дату, например, раз в секунду, еще никому не навредил!

---

← →
Мыш ©   (2003-05-11 02:48) [2]

Если он будет работать с интервалом гораздо меньшим секунды (1000), то никак не перепрыгнешь. Ну а если уж перепрыгнул, то можно сравнить дату - ведь она изменится после полуночи. А вообще посмотри в хелпе date/time routines - там все что тебе нужно для подобных вещей.

---

← →
Ш-К   (2003-05-11 06:30) [3]

Действительно, для полночи можно только день сверять.
Но дергать каждую секунду не есть гуд.

---

← →
uw ©   (2003-05-11 10:13) [4]

procedure Form1.SetTimerInterval;
var
MidNight: TDateTime;
begin
MidNight := Trunc(Now + 1.0);
Timer1.Interval := Round((MidNight - Now) * 24 * 3600 * 1000);
Timer1.Enabled := True;
end;

---

← →
Song ©   (2003-05-11 10:42) [5]

Добавь задачу в виндовый шедулер.

---

← →
next_ ©   (2003-05-11 13:07) [6]

> Действительно, для полночи можно только день сверять.
> Но дергать каждую секунду не есть гуд.

Основную часть времени прога (как правило) ничего полезного не делает - молотит цикл на проверку событий - секундный таймер тебе ничем не навредит...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c