Delphi Xe2 VCL 样式和网络浏览器
Win7 x64, Delphi Xe2 update2
提示：
- 新项目，编译为x32，在项目选项中应用视觉（vcl）样式，默认选择一个
- 在窗体上的button1和WebBrowser1
- 在按钮中我们编写WebBrowser1.Navigate(' http://google.com');
- 我们开始，按下按钮 - 在浏览器中我们看到一个网站 google.com，所有 ок
我们编译为 x64，它启动 ок，按下按钮我们收到错误“float 除零”。
问题：
- 到底是这样（错误）吗？和它一起奋斗吗？ （在 x64 模式下）
- 如何将视觉样式应用于滚动 WebBrowser1 的条带？ （在 x32 模式下） :( 原生组件无法换肤，但 AlphaControls 换肤系统 - 工作正常，网络浏览器滚动线换肤正常
p.s. update3 但没有将
p.ss bad english: on
Win7 x64, Delphi Xe2 update2
Prompt:
- The new project, compile as x32, are applied visual (vcl) styles in the project options, by default one is chosen
- On the form the button1 and WebBrowser1
- In the button we write WebBrowser1.Navigate ('http://google.com');
- We start, we press the button - in a browser we see a site google.com, all ок
We compile as x64, it is started ок, by button pressing we receive an error "float division on zerro".
Questions:
- At all so (error)? And as with it to struggle? (in x64 mode)
- How to apply visual style to strips of scrolling WebBrowser1? (in x32 mode)
:( a native component could not skin, but AlphaControls Skin system - work ok, and webbrowser scrolling lines skinned normal
p.s. update3 yet did not put
p.s.s. bad english: on
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论
评论（2）
这可以通过对 TWebBrowser 组件进行子类化并处理这些事件
以及 WM_SIZE 窗口消息。
关键是使用 TScrollbar 组件和 Twincontrol 作为容器来重叠原始的网络浏览器滚动条。
我刚刚写了一篇文章，深入解释了如何实现
Delphi Vcl 样式和 TWebBrowserThis can be done subclassing the TWebBrowser component and handling these events
plus the WM_SIZE windows message.
The key is use the TScrollbar component and a Twincontrol as container to overlap the original webbrowser scrollbars.
I just wrote an article which explains in depth how this can be implemented
Delphi Vcl Styles and TWebBrowserVCL 样式不能应用于
TWebBrowserAFAIK。它的 UI 由 Internet Explorer 控制，而不是 VCL。VCL styles cannot be applied to
TWebBrowserAFAIK. Its UI is controlled by Internet Explorer, not the VCL.