Schleife und Timer

[Asatru]

Delphi-Quellcode:

procedure TWebForm.Button1Click(Sender: TObject);
begin
  WebBrowser.Navigate('http://www.mufa.de');
  repeat
    Application.ProcessMessages;
  until DocumentLoaded; 
  WebBrowser.OleObject.document.forms.item(1).elements.item('xxx').value:= Edit1.Text;
  WebBrowser.OleObject.document.forms.item(1).elements.item('yyy').value:= Edit2.Text;
  WebBrowser.OleObject.document.forms.item(1).submit;
  repeat 
    Application.ProcessMessages; 
  until DocumentLoaded;
  WebBrowser.Navigate('http://www.mufa.de/free-sms.html');
  WebBrowser.OleObject.document.forms.item(1).elements.item('yyy').value:= Edit3.Text;
end;

So nu mein Problem

For to schleife wollte ich 5 mal ablaufen lassen, da stand ich muss die ganzen Befehle in {} malen, mach ich das, läuft er nix, lasse ich die klammern weg, funzt es zwar aber nur in einem durchlauf!

Timer: Zum schluss will ich sagen, das alles in der Schleife aller 10 minuten wiederholt wird.

Und zum schluss On Error goto 0, wie kann ich das in Delphi da reinbringen?!?


MFG und schonmal danke im vorraus!!!