Текущий архив: 2003.09.01;
Скачать: CL | DM;
Вниз
TTimer Найти похожие ветки
← →
cjiohobaji © (2003-08-12 13:24) [0]Почему то второй раз таймер, не запускается, Edit2 так и остаЁтся неизменным?? В чём дело? Кто знает?
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
TDateTime T;
AnsiString s;
T = T.CurrentDateTime();
s = T.TimeString();
Edit3->Text = s;
if (s == "16:01:11") {
Edit1->Text = s;
ShowMessage(s);
}
else if (s == "16:01:23") {
Edit2->Text = "16:01:23";
ShowMessage("call2");
}
}
← →
Плохиш_ (2003-08-12 13:33) [1]Хм, странный у тебя паскаль, однако
← →
wl © (2003-08-12 13:42) [2]to Плохиш_ (12.08.03 13:33) [1] :
Это Билдер
to cjiohobaji © (12.08.03 13:24)
У меня всё работает
← →
han_malign © (2003-08-12 13:49) [3]>s == "16:01:23"
- а кто сказал, что одно из событий таймера произойдет ровно в 16:01:23? Учитывая, что очередь событий таймера может и подзадержаться... (проверять надо все таки диапазон, или переход границы, но никак ни эквивалентность, Windows - далеко не система реального времени)
Страницы: 1 вся ветка
Текущий архив: 2003.09.01;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.018 c
