Ich glaube, das Ganze ist viel einfacher als gedacht: Einfach TWebBrowser.OnWindowClosing handlen:
Delphi-Quellcode:
procedure TKonfiguratorForm.BrowserWindowClosing(Sender: TObject; IsChildWindow: WordBool; var Cancel: WordBool);
begin
Cancel := True;
ModalResult := mrCancel;
end;
Es kommt keine Warnmeldung und der Dialog schließt sich automatisch.