Désactiver le dialogue webbrowser delphi

Question

Comment empêcher l'apparition de la boîte de dialogue Ce document a été modifié. Sauvegarder les modifications? qui se produit dans la transition lorsque webbrowser sur: vide

Merci beaucoup. ne si

Browser.Navigate ('about: blank'); 
    DesignMode (false ,''); 
    Browser.OnNavigateComplete2: = NavigateComplite; 

procedure NavigateComplite (ASender: TObject; const pDisp: IDispatch; var URL: OleVariant); 
begin 
    DesignMode (true ,''); 
end; 

Answer 1

je pense wich que vous utilisez la propriété designMode de l'interface IHTMLDocument2 dans votre code.

Vous pouvez désactiver la boîte de dialogue en définissant cette propriété sur 'Désactivé'.

essayer ce code avant de passer à la nouvelle page

(WebBrowser1.Document as IHTMLDocument2).designMode := 'off'; 
WebBrowser1.Stop;