Klappt immer noch nicht ganz.
Habs volgendermaßen gemacht.
Delphi-Quellcode:
procedure TButton1.Click ...
var i, r, q, s: OleVariant;
begin
WebBrowser.Navigate(Edit1.Text, i, r, q, s);
Form1.Caption := Webbrowser.OleObject.Document.title;
end;
Es passiert gar nix mit der Titellieste der Form.