Zitat von
demo13:
der compiler sagt:
"Undeclared identifier: 'TEmbeddedWB'"
und das gleiche für
"document"
Ersetze TEmbeddedWB mit TWebbrowser
Zitat:
NewWindow:=TForm4.Create(self);
URL:=((TEmbeddedWB(ASender).document as IHTMLDocument2).activeElement as IHTMLElement).getAttribute('href', 0);
NewWindow.Show;
NewWindow.web.Navigate(
url);
Warum so kompliziert?
Delphi-Quellcode:
NewWindow := TForm4.Create(self);
NewWindow.Show;
ppDisp := NewWindow.web.DefaultDispatch;