disable finestra browser web Delphi
-
30-09-2019 - |
Domanda
Come prevenire la comparsa della finestra di dialogo Questo documento è cambiato. Salvare le modifiche? che si verifica nella fase di transizione in cui browser web about: blank
Grazie mille. lo ha fatto
Browser.Navigate ('about: blank');
DesignMode (false ,'');
Browser.OnNavigateComplete2: = NavigateComplite;
procedure NavigateComplite (ASender: TObject; const pDisp: IDispatch; var URL: OleVariant);
begin
DesignMode (true ,'');
end;
Soluzione
penso wich si utilizza il designMode
proprietà dalla IHTMLDocument2
Interfaccia nel codice.
È possibile disattivare la finestra di dialogo impostare questa proprietà su 'Off'.
provare questo codice prima di passare alla nuova pagina
(WebBrowser1.Document as IHTMLDocument2).designMode := 'off';
WebBrowser1.Stop;
Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow