DelphiでWebBrowserを使用してJSメソッドを呼び出す方法は何ですか?

Delphiでは、WebBrowserのDocumentプロパティを使用してJavaScriptメソッドを呼び出すことができます。具体的な手順は以下の通りです。

  1. DelphiのフォームにTWebBrowserコントロールを配置し、SHDocVwユニットがインポートされていることを確認してください。
  2. JavaScriptメソッドを呼び出す必要があるイベントでは、WebBrowserのDocumentプロパティを使用して現在のウェブページのHTML文書オブジェクトを取得できます。次のコードを使用してDocumentオブジェクトを取得できます:
var
  Doc: OleVariant;
begin
  Doc := WebBrowser1.Document;
  1. Documentオブジェクトを取得したら、DocumentのparentWindowプロパティを使用してJavaScriptのグローバルwindowオブジェクトを取得できます。次のコードを使用してwindowオブジェクトを取得できます:
var
  Window: OleVariant;
begin
  Window := Doc.parentWindow;
  1. windowオブジェクトを取得することで、JavaScriptのメソッドを呼び出すことができます。execScriptメソッドを使用してJavaScriptコードを実行できます。次のコードを使用してJavaScriptのメソッドを呼び出すことができます:
Window.execScript('JavaScript代码');

例えば、”myFunction”という名前のJavaScriptメソッドを呼び出す場合、次のコードを使用できます:

Window.execScript('myFunction();');

JavaScriptメソッドを完全に呼び出すためのコードは次のようになります。

var
  Doc, Window: OleVariant;
begin
  Doc := WebBrowser1.Document;
  Window := Doc.parentWindow;
  Window.execScript('myFunction();');
end;

DelphiでWebBrowserコントロールを使用してJavaScriptメソッドを呼び出すための基本手順を示しました。必要に応じて適宜修正や拡張を行ってください。

bannerAds