Hallo !

Im OnNewWindow2 wird ein Link in einem neuen (internen) Fenster geöffnet.
Wie geht es, dass ein Link mit Targetangabe im gleichen Fenster geöffnet wird so wie es
der IE macht?

So wird ja immer eine neue Form mit Webbrowser erstellt.

zusammenfalten · markieren

Delphi-Quellcode:

procedure TfrmWeb1.WebBrowser1NewWindow2(ASender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
var
  NewWindow: TfrmWeb2;
begin
  NewWindow := TfrmWeb2.Create(Application);
  NewWindow.Caption := frmMain.Caption + ' ...';
  NewWindow.Webbrowser1.RegisterAsBrowser := True;
  NewWindow.Show;
  ppDisp := NewWindow.Webbrowser1.DefaultDispatch;
end;

Hat niemand eine Idee?
Wofür ist denn RegisterAsBrowser genau?

P U S H

Hi API

um den Link im gleichen Fenster zu öffnen, musst du Cancel auf True setzen, und damit die Navigation im neuen Fenster abbrechen.
Die URL nimmst Du dann, um im bestehenden TWebbrowser ein neues Navigate anzustossen. Dies geht dann nicht im OnNewWindow, sondern im OnBeforeNavigate, welches vorher gefeuert wird. Hier kannst Du das Target prüfen, und ggf. wie beschrieben reagieren.

Ich glaub ich habe mich etwas konfus ausgedrückt, aber du kriegst das hin. OnBeforeNavigate ist dein Freund.
Ich hab das vor langer Zeit mal gemacht, wenn es noch Probleme gibt, melde dich, dann such ich das nochmal raus.

Gruss