Одна и та же процедура каждые 5 минут

← →
Dyusha © (2005-03-09 14:04) [0]

Здравствуйте Уважаемые Мастера!!! Может-быть кто сталкивался с такой проблемой. Как можно спровоцировать выполнение процедуры для кнопки, к примеру, Button1 событие OnClick каждые 5 минут

Заранее благодарю за оказанную помощь

← →
MU © (2005-03-09 14:07) [1]

TTimer?

← →
Dyusha © (2005-03-09 14:09) [2]

ну это понятно, а какие нибудь другие методы есть............

← →
MU © (2005-03-09 14:10) [3]

чем плох?

← →
Dyusha © (2005-03-09 14:14) [4]

а у него сколько максимально интервал идет...........

← →
Zeqfreed © (2005-03-09 14:16) [5]

Dyusha © (09.03.05 14:04)

procedure TForm1.Button1Click(Sender: TObject); begin //DoSomething end; procedure TForm1.Button2Click(Sender: TObject); const Delay = 1000; //ms var Last : DWORD; begin while Form1.CheckBox1.Checked do begin Button1.OnClick(self); Last := GetTickCount; repeat Application.ProcessMessages; until (GetTickCount - Last > Delay) or (not Form1.CheckBox1.Checked); end; end;

← →
Anatoly Podgoretsky © (2005-03-09 14:19) [6]

Dyusha © (09.03.05 14:14) [4]
Можно sleep, интервал одинаковый, описан в справке по обеим вещам, так что можешь брать любую.

← →
Anatoly Podgoretsky © (2005-03-09 14:20) [7]

Zeqfreed © (09.03.05 14:16) [5]
Зачем же разогревать процессор, он и так горячий.

Anatoly Podgoretsky © (09.03.05 14:20) [7]
Думаю, что пользователь нагреется гораздо больше если будет ждать 5 минут пока получит возможность снять флажок.

Какой, какой флаэок, я что то пропустил в вопросе?

Anatoly Podgoretsky © (09.03.05 14:26) [9]
Я про свою писанину; в общем случае конечно же sleep несравненно лучше моего нетрепетного по отношению к процессору метода.

Одна и та же процедура каждые 5 минут Найти похожие ветки