Feststellen ob JavaScript im IE (TWebBrowser) deaktiviert ist

[KodeZwerg]

Ich fand so etwas um Scripte aufzurufen, vielleicht findest Du ja eine Stelle wo man es auswerten könnte:

Delphi-Quellcode:

uses 
  MSHTML_TLB, SHDocVw, ShellAPI;

procedure ExecuteScript(doc:IHTMLDocument2;script:string;language:string);
var
 win: IHTMLWindow2;
 Olelanguage: Olevariant;
begin
 if doc <> nil then
 begin
   try
     win := doc.parentWindow;
     if win <> nil then
     begin
       try
         Olelanguage := language;
         win.execScript(script, Olelanguage); // kann man hier noch was auswerten?
       finally
         win := nil;
       end;
     end;
   finally
     doc := nil;
   end;
 end;
end;

//Beispiel
ExecuteScript(WebBrowser1.Document as HTMLDocument2,'MyJava()','JavaScript');