Mega Code Archive

 
Categories / Delphi / LAN Web TCP
 

How to open url in new window with custom TWebBrowser

Title: How to open url in new window with custom TWebBrowser procedure TForm1.WebBrowser1NewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool); var NewWindow: TForm1; begin // a new instance of the form will be created NewWindow := TForm1.Create(self); NewWindow.Show; ppDisp := NewWindow.Webbrowser1.DefaultDispatch; end;