Wunderbar! Danke! Es funktioniert jetzt!
Ich dachte bisher, das ich dem neuen Browser irgendwie das ppDisp zuweisen müsste und nicht umgekehrt!
Vielleicht ist der Code so verständlicher:
Delphi-Quellcode:
procedure TForm1.WebBrowser1OnNewWindow2(Sender: TObject;var ppDisp: IDispatch;var Cancel: WordBool);
var newform: TForm1;
begin
newform := TForm1.Create(Application);
newform.WebBrowser1.RegisterAsBrowser := true;
ppDisp := new_form.WebBrowser1.Application;
end;
MfG
Mystic