Wie Delphi TWebbrowser-Komponente Ausführung im IE9-Modus?

Ich bin in Javascript-Fehler mit TWebbrowser aufgrund der Tatsache, dass TWebbrowser läuft im IE7-Kompatibilitätsmodus.

Gibt es eine Möglichkeit, dies zu verhindern und nur die Ausführung im IE9-Modus?

InformationsquelleAutor user2638894 | 2014-09-15
  1. 11
    1. Opt-in, um die browser-emulation-Funktion mit der beschriebenen registry-Schlüssel.
    2. Je nach browser-emulation die Einstellung, die Sie ausgewählt haben, müssen Sie möglicherweise, um sicherzustellen, dass Ihr Dokument enthält einen passenden DOCTYPE. Wieder, dies ist beschrieben in der Dokumentation.

    So, zum Beispiel, wenn Sie möchten, um die einfachste mögliche ändern möchten, fügen Sie die folgende Einstellung in der Registrierung:

    HKEY_LOCAL_MACHINE (oder HKEY_CURRENT_USER) 
SOFTWARE 
Microsoft 
Internet Explorer 
Main 
FeatureControl 
FEATURE_BROWSER_EMULATION 
YourExeNameGoesHere.exe = (DWORD) 00009999

    In der Dokumentation für den Wert 9999 sagt:

    9999 Windows Internet Explorer 9. Webseiten werden angezeigt, im IE9-Standards-Modus, unabhängig von der !DOCTYPE-Richtlinie.

    Waren, die Sie verwenden 9000 dann müssten Sie auch ändern Sie den DOCTYPE des Dokuments:

    9000 Internet Explorer 9. Webseiten mit standards-based !DOCTYPE-Richtlinien werden angezeigt, im IE9 Modus. Standardwert für den Internet Explorer 9.

    Den verlinkten Dokumentation enthält auch die benötigten Informationen ein, legen Sie andere IE-Versionen.

    • TY. Diese Lösung funktioniert. Für 32-bit-Anwendungen auf einem 64 bit-Betriebssystem, müssen Sie den Eintrag unter " SOFTWARE\Wow6432Node\Microsoft\...
    • Das ist richtig. Es sei denn, Sie verwenden HKCU\Software für die es keine getrennten 32-und 64-bit-Ansichten. Natürlich, wenn Sie fügen Sie die Einstellung in Ihrem Programm installieren, dann die registry redirector wird die Arbeit für Sie und leiten auf die 32-bit-Ansicht. Vorausgesetzt, dass ein 32-bit installer für 32-bit-Programm.
    • Ein bisschen off-topic, aber stille relevant für Sie: arbeiten Sie mit TwebBrowser diese Seite könnte Ihnen helfen, eine Menge : delphidabbler.com/articles?article=21
    • Ich empfehle die Aktualisierung Ihrer Antwort mit Informationen darüber, wie Sie sicherstellen können, dass TwebBrowser läuft in der neuesten emulation-Modus (IE11 zum Beispiel), da dies scheint die am häufigsten vorkommende Antwort bezüglich TWebBrowser und emulation-Modus Probleme in Delphi. Ich weiß, die Frage ist zu Fragen, speziell für den IE9-emulation, aber ist es wirklich notwendig, dass jemand erstellen eine neue Frage bezüglich der TWebBrowser IE11-emulation-Modus, das wäre dann fast die gleiche Antwort mit nur Unterschied in der DWORD-Wert muss verwendet werden, um zu erreichen, IE11 emulation-Modus
    • die Werte sind alle aufgeführt, die in den docs, die ich verlinkt
    • Ja, aber nirgends in deiner Frage tun Sie feststellen, dass ein solcher Ansatz kann auch verwendet werden, für die Emulation der verschiedenen IE-Versionen einfach durch die Verwendung von verschiedenen DWORD-Werte.
    • naja, vielleicht, aber ich bin der Meinung, dass wir hier sind, um Menschen helfen, zu lernen und zu ermutigen, Ihre eigene Forschung. Wenn Sie nicht in der Lage das Lesen der verlinkten Dokumentation und ihn zu verstehen, dann bin ich nicht interessiert zu helfen.
    • Und auf der anderen Seite beschweren sich oft, wenn andere Leute link auf externe Ressourcen in Ihre Antworten. Außerdem ist nicht der Zweck, SO zu Antworten zu Häufig gestellten Fragen und nicht pointes, wie man diese Antworten?
    • Links auf externe Ressourcen sind in Ordnung, solange die Antwort ist mehr als nur das. Wollen Sie mir die Kopie der gesamten Liste und halten Sie Sie up to date mit allen änderungen.
    • Nein! Ich bin nur darauf hindeutet, dass die Antwort so geändert, dass es klar, dass die verlinkte Dokumentation bietet auch Informationen, die für die Emulation anderer Browser-Versionen und nicht nur mit dem IE9, der speziell erwähnt beide in Frage und Antwort, aber kein anderer browser-Versionen sind.
    • Sie können nur eine Bearbeiten-sich selbst

    InformationsquelleAutor David Heffernan
  2. 5

    include in html, " http-equiv="X-UA-Compatible" content="IE=edge" 

    <!DOCTYPE html>
<html>
<head>
    <meta charset="utf-8" http-equiv="X-UA-Compatible" content="IE=edge" />
</head>
<body> 
                your code ....
</body>
</html>
    • Beachten Sie, dass dieses meta-tag muss der erste - tag im head-Abschnitt und <!DOCTYPE html> muss auch eingestellt werden.
    InformationsquelleAutor Rafael Maires Rangel
  3. 2

    Fügen Sie diese Klasse, um Ihren code:

    type TBrowserEmulationAdjuster = class
  private
      class function GetExeName(): String; inline;
   public const
      // Quelle: https://msdn.microsoft.com/library/ee330730.aspx, Stand: 2017-04-26
      IE11_default   = 11000;
      IE11_Quirks    = 11001;
      IE10_force     = 10001;
      IE10_default   = 10000;
      IE9_Quirks     = 9999;
      IE9_default    = 9000;
      /// <summary>
      /// Webpages containing standards-based !DOCTYPE directives are displayed in IE7
      /// Standards mode. Default value for applications hosting the WebBrowser Control.
      /// </summary>
      IE7_embedded   = 7000;
   public
      class procedure SetBrowserEmulationDWORD(const value: DWORD);
end platform;
    class function TBrowserEmulationAdjuster.GetExeName(): String;
begin
    Result := TPath.GetFileName( ParamStr(0) );
end;

class procedure TBrowserEmulationAdjuster.SetBrowserEmulationDWORD(const value: DWORD);
const registryPath = 'Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION';
var
    registry:   TRegistry;
    exeName:   String;
begin
    exeName := GetExeName();

    registry := TRegistry.Create(KEY_SET_VALUE);
    try
       registry.RootKey := HKEY_CURRENT_USER;
       Win32Check( registry.OpenKey(registryPath, True) );
       registry.WriteInteger(exeName, value)
    finally
       registry.Destroy();
    end;

    Ende;

    Dann fügen Sie zu Ihrem OnCreate des Formulars:

    TBrowserEmulationAdjuster.SetBrowserEmulationDWORD(TBrowserEmulationAdjuster.IE11_Quirks);

    Thats alle für immer

    InformationsquelleAutor Ingo
Schreibe einen Kommentar