Hallo alle Forumuser
Hab hier ein kleines Problem, und kenne den Grund nicht.
Ich will mir für mein Online-Game ein kleines Hilfeprogramm schreiben.
Hab auch schon viel Hilfe hier im Forum gefunden, nur leider versteh ich nicht, worum ich auf dieser
Seite den 'Login'-Button nicht (per Delphi) drücken kann.
Hab schon die Folgenden Links ausprobiert doch leider kein Erflog:
Link 1
Link 2
Link 3
Mein Code
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
i: Word;
Document: IHtmlDocument2;
str:
string;
begin
// Schleife über alle Bilder im Webbrowser
for i := 0
to WebBrowser1.OleObject.Document.Images.Length - 1
do
begin
Document := WebBrowser1.Document
as IHtmlDocument2;
// URL auslesen
Str := (Document.Images.Item(i, 0)
as IHTMLImgElement).Href;
// Dateiname des Bildes überprüfen
if Pos('
login.gif', str) <> 0
then
begin
((Document.Images.Item(i, 0)
as IHTMLImgElement)
as IHTMLElement).Click;
end;
end;
end;
Wo liegt der Fehler? Oder was muss ich beachten?
Schonmal Vielen Dank
MfG Moyyer