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!

[alias5000]

ist die Procedure ClickLink von dir, oder hab ich da was übersehen?

[heribert]

jo, die ist natürlich von mir :)

[alias5000]

kann das an der liegen, n bisschen Source-Code würde da wahrscheinlich net schaden, oder?

[heribert]

ne, wie shcon oben gesagt funktioniert die funktion ja einwandfrei, wenn ich sie einfach mit nem anderen button aufrufen lasse...

[alias5000]

Hängt sich das Programm auf? Die Prozedure ClickLink wird aber noch aufgerufen?

PS.: ups hatte es überlesen...

[heribert]

nope hängt sich net auf...
ich bin mir net sicher ob die clicklink noch ausgeführt wird... lässt man das mit dem readystate nämlich weg passiert auch nix, aber normalerwiese müsste da ja nen fehler kommen, weil der link noch gar nicht geklickt werden könnte, wenn die seite noch nicht geladen ist...

[marabu]

Hallo heribert,

dein Code bis zum Aufruf ClickLink() funktioniert bei mir. Versuche doch mal per single step in die Routine rein zu gehen.

Grüße vom marabu

[heribert]

ok, also die clicklink aktion wird nicht aufgerufen... ka warum!

[alias5000]

das heißt das der Browser dann nie zuendegeladen hat.... Wie lange lässt du dir Zeit?