德尔福XE2 VCL风格和网页浏览器

Question

Win7的X64，德尔福XE2 UPDATE2

提示：

1. 新的项目，编译为32倍，在项目的选择应用的视（VCL）的风格，在默认情况下一个被选中
2. 在窗体上button1和WebBrowser1
3. 在我们编写的按钮WebBrowser1.Navigate（'http://google.com'）;
4. 我们开始，我们按下按钮 - 在我们看到一个网站google.com浏览器，所有ок

我们编译为64位，则启动ок，按下按钮来我们收到错误“浮动师在零罗“。

问题：

1. 在所有这样（错误）？和它一样挣扎吗？ （在x64模式下）
2. 如何将视觉样式应用于滚动WebBrowser1？ （在X32模式） :(一机组件无法皮肤，但皮肤AlphaControls系统 - 工作确定，web浏览器滚动线剥皮正常但

PS UPDATE3没有把

PSS英文不好：上

Answer 1

这是可以做到的子类组件TWebBrowser和处理这些事件

OnDocumentComplete 
OnNavigateComplete2 
OnBeforeNavigate2 
OnCommandStateChange 
OnProgressChange 

加上WM_SIZE窗口消息。

关键是使用TScrollbar组件和Twincontrol作为容器来重叠原始浏览器滚动条。

我只是写了深入阐述如何能够实现Delphi Vcl Styles and TWebBrowser

Answer 2

VCL样式不能应用于TWebBrowser AFAIK，它的用户界面是通过IE浏览器，而不是VCL控制。