Internetexplorer Seite ändern und absenden

[Eichhoernchen]

Ja ich weiß, da steht scho nwas im Forum dazu drinn, aber nicht auf die Art und Weise wie ich es gern hätte, beziehungsweise so wie es da steht geht es bei mir nicht.


Also ich hab nen window handle das die class: 'Internet Explorer_Server' hat, nun möchte ich in diesem IE Fenster den Inhalt von einer <input type='text' id='n2'> Feld setzten und anschließend einen Knopf am ende des Formulars drücken.

Dazu habe ich mir bis jetzt diese beiden units angeschaut: MSHTML_TLB, SHDocVw_TLB



Nun habe ich folgendes versucht:

Delphi-Quellcode:

var hIE: HWND;
    ShellWindow: IShellWindows;
    i : integer;
Begin
  hIE := //Das Handle von meinem IE fenster das hab ich schon
  ShellWindow := CoShellWindows.Create;
  for i := 0 to ShellWindow.Count - 1 do
  begin
    if (shellwindow.Item(i) as iWebBrowser2).HWND = hIE
      then Begin
            showmessage('GEFUNDEN');
            ...
           end;
  end;
end;

Naja nur mein Problem ist das der der Fall in der If Abfrage niemals eintritt, woran liegt das?? Eigentlich müsste das doch klappen und das hIE handle stimmt zu 100%. Was mach ich falsch, bitte helfen!!!