Hallo,
ich habe ein Problem. Und zwar arbeite ich gerade an meinem eigenem Webbrowser. Dieser Webbrowser unterstützt das Tabbing Browsing.
Zu meinm Problem: Es gibt z.B. Links auf Websites die im Firefox Browser in einem weiteren Tab angezeigt werden, dass funktioniert bei mir auch. Aber es gibt auch seiten, die nicht im Tab sondern in einem neuen Fenster aufgebaut werden...wie erkenne ich das. Denn bei mir kommt ein
OLE Object Fehler.
hier mein Code
Delphi-Quellcode:
procedure TFMain.WebBrowser1NewWindow2(ASender: TObject;
var ppDisp: IDispatch;
var Cancel: WordBool);
begin
if self.PopUpBlock
then
begin
ppDisp :=
nil;
Cancel := true;
end else
begin
try
Cancel := false;
NewTab('
About:Blank','
Zurfo - Web');
tab.ActivePage.Show;
Wb := GetCurrentWb;
//ermitteln den aktiven Webbrowser Controll...
WaitForBrowser(WB);
ppdisp := WB.Application;
WaitForBrowser(WB);
except on E:
Exception do begin end;
end;
end;
end;