Текущий архив: 2004.02.02;
Скачать: CL | DM;

Вниз

Timer   Найти похожие ветки 

← →
sbuffoon   (2004-01-20 23:52) [0]

Напишите пожалуйста код программы, чтобы при нажатии на кнопку в label через 1 секунду уменьшалось значение на 1 (например 60 через 1 сек 59 через 1 сек 58 и т.д. до нуля)

---

← →
хз ©   (2004-01-20 23:58) [1]

=)))

OnTimer

var
c:integer;
begin
c:=strtoint(label1.caption);
if c>0 then
c:=c-1;
label.caption:=inttostr(c);
end;

---

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

Текущий архив: 2004.02.02;
Скачать: CL | DM;

Наверх

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