Unterdrückt die "wollen Sie wirklich diese Seite zu verlassen" popup in der Delphi TWebbrowser-Steuerung

Ich habe eine Delphi-Anwendung, die verwendet TWebbrowser Komponente zu automatisieren navigation zu einer anderen web-Anwendung, die wir haben.

Mein problem ist, dass manchmal der IE zeigt die berüchtigten "Sind Sie sicher, dass Sie wollen, diese Seite zu verlassen' Meldung und wenn dies geschieht, meine app kann nicht navigieren Sie zu anderen Seiten, es sei denn, ein Benutzer klickt auf 'Verlassen Sie diese Seite' button. Ich kann nicht Bearbeiten Sie die website-code zu entfernen diese Warnung, leider.

Diese Nachricht ist plagt meine app für Wochen, und ich konnte Sie nicht erreichen, um eine angemessene Lösung mehr. Was ich gemacht habe ist, um einen hintergrund-Prozess manuell senden einer Tastatureingabe, wenn dieses Fenster wird angezeigt, aber dies ist nicht eine gute Lösung, denn niemand kann den computer benutzen, während meine app funktioniert.

Ich sah die mögliche Lösung für C# im Thema unter, aber ich brauche eine Delphi-code statt.

Unterdrückt die "wollen Sie wirklich diese Seite zu verlassen" popup in der .NET-webbrowser-Steuerelement

Jede Hilfe sehr, sehr dankbar.

Dank 🙂

  • Es ist wahrscheinlicher, Sie können dies tun, mit TEmbeddedWB, die verbesserte version des IShellDocView/InternetExplorer hat es viel mehr features als die TWebBrowser-wrapper.
  • Warum kann nicht der Benutzer, der browsing klicken Sie auf den button?
InformationsquelleAutor delphirules | 2013-10-13
  1. 3

    Diese Meldung wird angezeigt, indem Sie die zugrunde liegenden MSHTML-engine wenn sich die web-Seite Griffe Fenster.onbeforeunload Veranstaltung. In der Regel ist es da für einen Grund, damit der Benutzer weiß, seine/Ihre Eingabe nicht gespeichert oder übermittelt noch. Die Aufforderung Unterdrückung Skript von die Antwort, die Sie verlinkten funktioniert nicht für die Fälle, wenn die Seite benutzt wird addEventListener("beforeonload", handler) oder attachEvent("onbeforeunload", handler). Ich glaube nicht, dass es eine zuverlässige Möglichkeit, dies zu tun, ohne Rückgriff auf low-level-Windows-hooks.

    [UPDATE] Das folgende Skript aus (suchen Sie nach "Spritzen Sie das Skript") ist ein hack, die aggressiv unterdrückt die Seite der eigenen Handler für onbeforeunload Ereignis, über setInterval. Es sollte in 99% der Fälle, aber es lässt immer noch eine Lücke für die Seite zu überschreiben onbeforeonload direkt vor der Navigation Weg.

    <!DOCTYPE html>
<html>
<head>
    <meta http-equiv="X-UA-Compatible" content="IE=edge" />
    <title></title>
    <script type="text/javascript">
        window.attachEvent("onbeforeunload", function (ev) {
            window.event.returnValue = "onbeforeunload via window.attachEvent()";
        });

        window.addEventListener("beforeunload", function (ev) {
            window.event.returnValue = "onbeforeunload via window.addEventListener()";
        });

        window.onbeforeunload = function (ev) {
            window.event.returnValue = "onbeforeunload via window.onbeforeunload";
        };
    </script>

    <script type="text/javascript">
        //
        // Inject this script
        //
        (function () {
            var onbeforeunloadHandler = function (ev) {
                if (ev) {
                    if (ev.stopPropagation)
                        ev.stopPropagation();
                    if (ev.stopImmediatePropagation)
                        ev.stopImmediatePropagation();
                    ev.returnValue = undefined;
                }
                window.event.returnValue = undefined;
            }

            var handler = null;
            var intervalHandler = function () {
                if (handler)
                    window.detachEvent("onbeforeunload", handler);

                //window.attachEvent works best
                handler = window.attachEvent("onbeforeunload", onbeforeunloadHandler);
                //handler = window.addEventListener("beforeunload", onbeforeunloadHandler);
                //handler = window.onload = onbeforeunloadHandler;
            };

            window.setInterval(intervalHandler, 500);
            intervalHandler();
        })();
    </script>

</head>
<body>
    <a href="http://www.example.com">Go away</a>
</body>
</html>

    Injizieren dieses script mit Delphi, würden Sie wahrscheinlich brauchen, to resort to low-level - WebBrowser/MSHTML COM-Schnittstellen, wie IWebBrowser2, IHTMLDocument2, IHTMLScriptElement, in einer sehr ähnlichen Art, wie es geschieht in der verlinkten Antwort. Mit etwas mehr Bemühungen, das gleiche kann man auch über die späte Bindung, mit IDispatch::GetIDsOfNames und IDispatch::Invoke nur. Wenn Sie Fragen zur genauen Delphi-code, weiß ich nicht.

    • Danke für Eure Ideen. Ich habe nicht die Delphi-code, es zu tun, aber was ich habe ist ein workaround besser als send-return-Zeichen ein. Wenn das Dokument geladen ist, rufe ich .navigate2-Methode mit diesem : "javascript:Fenster.onbeforeunload = function(){};window.focus();"
    • Obwohl nicht eine 'elegante' Lösung, die zumindest die berühmt-berüchtigte Meldung nicht Plage mich nicht mehr.
    InformationsquelleAutor noseratio
  2. 1

    Die anderen beantworten Sie mit einem link auf die Griffe des Browsers Navigated Veranstaltung. In es, es spritzt ein script-element in die Seite und in jedem frame auf die Seite. Das Skript einen neuen Wert zuweist window.alert so, dass, wenn anderer code auf der Seite ruft es, es bringt nichts.

    InformationsquelleAutor Rob Kennedy
  3. 1

    Dieser code setzt den event-handler:

    var
  WrkIHTMLWindow2: IHTMLWindow2;
  WrkIHTMLWindow2Disp: IHTMLWindow2Disp;
begin
  WrkIHTMLWindow2 := IHTMLDocument2Disp(WrkIWebBrowser2.Document).parentWindow;
  if WrkIHTMLWindow2.QueryInterface(IHTMLWindow2Disp, WrkIHTMLWindow2Disp) = S_OK then
    if not VarIsNull(WrkIHTMLWindow2Disp.onbeforeunload) then
      WrkIHTMLWindow2Disp.onbeforeunload := NULL;
end;
    InformationsquelleAutor Carlos Cuesta
Schreibe einen Kommentar