実行時にDelphiでTWebBrowserを作成する

2年 ago
優斗, 朝陽
1 minute

Delphi で実行時に TWebBrowser を作成するには、以下の手順に従います。1. Delphi IDE を開き、新しい VCL フォーム アプリケーション プロジェクトを作成します。2. メイン フォームに TButton と TWebBrowser コントロールを追加します。3. ボタンをダブルクリックし、ボタンの OnClick イベント ハンドラーに次のコードを追加します。“`delphiprocedure TForm1.Button1Click(Sender: TObject);var
WebBrowser: TWebBrowser;begin
// TWebBrowser コントロールを作成する
WebBrowser := TWebBrowser.Create(Self);
// 親コントロールをメイン フォームに設定する
WebBrowser.Parent := Self;
// 位置とサイズを設定する
WebBrowser.Left := 10;
WebBrowser.Top := 50;
WebBrowser.Width := 400;
WebBrowser.Height := 300;
// ウェブページを読み込む
WebBrowser.Navigate(‘https://example.com’);
// コントロールを表示する
WebBrowser.Visible := True;end;“`4. プログラムを実行し、ボタンをクリックすると、メイン フォームに TWebBrowser コントロールが作成されて表示され、指定した Web ページが読み込まれます。この方法で、Delphi で実行時に TWebBrowser コントロールを作成できます。

bannerAds