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

Время   Найти похожие ветки 

← →
UVV ©   (2004-12-22 15:01) [0]

Как узнать, что наступило нужное время, скажем 00:00!
Желательно пример!

---

← →
Stanislav ©   (2004-12-22 15:09) [1]

TTimer
И на событие OnTimer проверять if time=0 then ...

---

← →
Alexander Panov ©   (2004-12-22 15:11) [2]

if FormatDateTime("hh:nn",now)= "00:00" then ...

---

← →
TUser ©   (2004-12-22 15:12) [3]

procedure Timer1OnTimer()
var i,k: integer;
   f: boolean;
begin
 i:=SecondsBetween(now,needtime);
 k:=4048; f:=true;
 while f and (k > 32) do
   if i >= k then
     k:=k shr 1
     else f:=false;
 if f then
    k:=1
    else k:=k*2;
 Timer1.Interval:=k; // Надеюсь не напутал - смысл в том, чтобы ближе к дедлайну проверять почаще
 if i = 0 then
   do something
end;
     
 
end;

---

← →
UVV ©   (2004-12-22 15:15) [4]

Уточню вопрос, нужно каждый Новый Год выполнить определённую процедуру! Поэтому так часто проверять смысла нет!

---

← →
Stanislav ©   (2004-12-22 15:19) [5]

Таймер установи на 24*60*1000, и будешь проверять раз в день.

---

← →
Alexander Panov ©   (2004-12-22 15:27) [6]

UVV ©   (22.12.04 15:15) [4]

У тебя что, программа работает 24/7/365 ?

---

← →
Stanislav ©   (2004-12-22 15:33) [7]

Stanislav ©   (22.12.04 15:19) [5]

Т.е. 24*3600*1000

---

← →
UVV ©   (2004-12-22 15:39) [8]

2 Alexander Panov
Да

---

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

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



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