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

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

← →
Сережа   (2004-01-17 23:31) [0]

В проседуре запускается таймер!как сделать так чтобы выполнилась работа таймера и только после это процедура продолжила свою работу?

---

← →
сорсыч   (2004-01-17 23:44) [1]

А в чем тогда смысл таймера?
Если конструктивно? В такой постановке вопроса - наверно никак.

---

← →
goga ©   (2004-01-17 23:49) [2]

Есть такая процедура Sleep(время в миллисекундах)

---

← →
goga ©   (2004-01-17 23:52) [3]

В том плане, что не надо таймер, сделай Sleep(время паузы) и потом свой код.

---

← →
сорсыч   (2004-01-18 00:18) [4]

> goga © (17.01.04 23:49) [2]

Интересно, а вовремя слип кто работу программы делать будет? Пользователь с гумажкой? "После окончания расчета нажмите ОК?"

---

← →
сырсыч   (2004-01-18 00:26) [5]

procedure TForm1.Button1Click(Sender: TObject);
begin
if Sender is TButton then begin
Timer1.OnTimer := Button1Click;
Timer1.Enabled := True;
end else begin
Timer1.Enabled := False;
DoOnTimerWork;
end;
end;

---

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

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



Память: 0.45 MB
Время: 0.015 c