TTimer этой таймер
Твой скрипт должен выглядеть так
DELPHI Код:
var timer:TTimer;
procedure Init;
begin
timer:=TTimer.Create(nil);
timer.OnTimer:=@OnTimer;
timer.enabled:=true;
timer.interval:=700; //время задержки в мсек
end;
procedure OnTimer(Sender: TObject);
begin
//Здесь твой скрипт
end;
begin
end.