Twebbrowser Problem...

[heribert]

hi, hab folgenden code:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  WebBrowser1.Navigate('http://mail.yahoo.de');
  repeat
  Application.ProcessMessages;
  until WebBrowser1.ReadyState >= READYSTATE_COMPLETE;
  WebBrowser1.OleObject.document.forms.item(0).elements.item('login').value:='******';
  WebBrowser1.OleObject.document.forms.item(0).elements.item('passwd').value:='*****';
  WebBrowser1.OleObject.document.forms.item(0).submit;
  repeat
  Application.ProcessMessages;
  until WebBrowser1.ReadyState >= READYSTATE_COMPLETE;
  ClickLink(WebBrowser1, 'Posteingang');
end;

das script loggt sich bei einer mailadresse von yahoo ein und soll dann automatisch auf posteingang klicken (dazu die funktion ClickLink). Nur wird das dann nicht mehr ausgeführt (also er loggt sich ein, klickt aber nicht mehr auf "Posteingang"). Wenn ich aber ClickLink(WebBrowser1, 'Posteingang'); einem anderen button zuweise und nach dem login dann dadrauf klick, funktionierts einwandfrei!