Таймер

← →
selena (2004-01-09 09:05) [0]

Как сделать так чтобы процедура запускалась каждые
10 минут?

← →
alex_*** © (2004-01-09 09:10) [1]

Сам не догадываешься? Про таймер слышал?

← →
selena (2004-01-09 09:11) [2]

можно код?

← →
begin...end © (2004-01-09 09:11) [3]

Timer.Interval := 600000;

procedure TForm1.TimerTimer(Sender: TObject);
begin
MyProc;
end;

← →
begin...end © (2004-01-09 09:15) [4]

Сложно, да? :)

← →
Brahman © (2004-01-09 10:04) [5]

Вот про это поподробней:)
Timer.Interval := 600000;

Это интервал в 10 минут

> Timer.Interval := 600000;

а что тут неясного?
Это сочетание знаков, обозначающих буквы к/л алфавита(см. словарь), и несущую смысловую нагрузку, при определенном порядке следования, в определенных кругах индивидуумов, придерживающихся некоторых правил и систем ценностей, эмпирически подтвержденных в данной системе при принятии аксиом данной системы.
При смене системы смысловая нагрузка может меняться, но, неисключено, что не может исчезать вплоть до смысла сочетания не алфавитных знаков
В принятой системе число(см.словарь) принято считать за кол-во(см.словарь) миллисекунд(см.словарь)

А можно через WinApi:
procedure TForm1.FormCreate(Sender: TObject);
var
h:Integer
begin
h:=settimer(handle,0,600000,@myproc);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
killtimer(handle,h);
end;

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