Форум: "Основная";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Вниз

Как сделать обратный отсчет времени?   Найти похожие ветки 

← →
Брат   (2002-11-12 12:34) [0]

Как сделать обратный отсчет времени? Есть у меня на форме таймер. Хочу в лэйбл выводить обратный отсчет... Братья, подскажите как это проще сделать?

---

← →
F1   (2002-11-12 12:37) [1]

Var MyTime:Integer;

oncreate
MyTime:=Скока нада;

procedure OnTimer;
begin
MyTime:=MyTime-1;
Label1.Caption:=IntToStr(MyTime);
if MyTime=0 then Timer1.Enable:=False;
end;

---

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

Форум: "Основная";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.008 c