3

Win7 x64、Delphi Xe2 update2

促す:

  1. x32としてコンパイルされた新しいプロジェクトは、プロジェクトオプションでビジュアル(vcl)スタイルが適用され、デフォルトで1つが選択されます。
  2. フォーム上でbutton1とWebBrowser1
  3. ボタンには、WebBrowser1.Navigate('http://google.com');と記述します。
  4. 開始し、ボタンを押します-ブラウザにサイトgoogle.comが表示されます。

x64としてコンパイルし、起動します。ボタンを押すと、「zerroの浮動小数点除算」というエラーが表示されます。

質問:

  1. まったくそう(エラー)?そして、それと同じように苦労しますか?(x64モードの場合)
  2. スクロールするWebBrowser1のストリップに視覚スタイルを適用するにはどうすればよいですか?(x32モードの場合):(ネイティブコンポーネントはスキンできませんでしたが、AlphaControlsスキンシステム-正常に動作し、Webブラウザのスクロールラインは正常にスキンされました

psupdate3はまだ入れていません

pssバッドイングリッシュ:オン

4

2 に答える 2

6

これは、TWebBrowserコンポーネントをサブクラス化し、これらのイベントを処理することで実行できます。

OnDocumentComplete
OnNavigateComplete2
OnBeforeNavigate2
OnCommandStateChange
OnProgressChange

加えて、WM_SIZEウィンドウメッセージ。

重要なのは、TScrollbarコンポーネントとTwincontrolをコンテナーとして使用して、元のWebブラウザーのスクロールバーをオーバーラップさせることです。

これを実装する方法を詳細に説明する記事を書いたばかりですDelphi Vcl Styles and TWebBrowser

于 2012-03-20T06:05:56.777 に答える
0

TWebBrowserVCLスタイルはAFAIKには適用できません。そのUIは、VCLではなくInternetExplorerによって制御されます。

于 2011-11-28T03:56:34.990 に答える