Вниз
Скачать: CL | DM;

Как из Label сделать таймер?   Найти похожие ветки 

 
Lebedev   (2007-10-21 10:18) [0]

Подскажите пожалуйста, как сделать так, чтобы label отображала отсчёт времени в секундах, если на форме есть компонент Timer. То есть, если таймер установлен на минуту (timer1.intervar:=60000), то чтобы на метке в этот момент происходило уменьшение числа с 60 до 0.


 
Virgo_Style ©   (2007-10-21 10:42) [1]

Lebedev   (21.10.07 10:18)

Timer.Interval:=1000;
Timer.Tag:=60;


OnTimer:
Timer.Tag:=Timer.Tag-1;
Label.Caption:=Timer.Tag;
if Timer.Tag=0 then begin
 Timer.Enabled:=false;
 Boooom; //сработало
end;


как-то так.


 
Lebedev   (2007-10-21 16:26) [2]

Спасибо!



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

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



Память: 0.45 MB
Время: 0.014 c
2-1192457940
foreverDelphi
2007-10-15 18:19
2007.11.11
как вывести текст


15-1191521154
kalexi
2007-10-04 22:05
2007.11.11
Перехват функций...


2-1192902797
Jimmy
2007-10-20 21:53
2007.11.11
Изменить цвет отдельных символов Label


6-1173453698
Empleado
2007-03-09 18:21
2007.11.11
Мой первый application hangs (Indy)


2-1192502547
npr2
2007-10-16 06:42
2007.11.11
dbgrid




   Наверх