【TWebBrowser Or EmbeddedWB 完全技巧收集】 (300分)

在网上和大富翁以前的帖子里，有很多有关TWebBrowser 和 EmbeddedWB 的问题，
可是问题解决的都不是很好，在加上EmbeddedWB的网站已经很久没有更新，所以
请各位对TWebBrowser 和 EmbeddedWB（尤其是EmbeddedWB）有所了解的大富翁们
能够把自己对此的经验，技巧分享出来，也好让我长长见识！^_^

MSDN
http://www.euromind.com/iedelphi/
http://service.lonetear.com/delphi/dispdoc.asp?id=1340
http://eagleboost.myrice.com/
http://www.delphibbs.com

这些资料都是大家找得到，看得到的内容，我也看了许多这些文章，可总觉得不是很好，
所以采伐这个帖子，希望大家Share

关键还是在于你对“这个对象”了解多少，即了解对象模型。

我希望作为一个初学者来讨论这个问题，收集一下大家的看法。
比如说：
1.EmbeddedWB如何在XP下有主题视觉效果。
2.动态创建后一些事件会无法响应的处理办法。
…………
当然，IE&Delphi网站里也有一些好用的控件，比如说:IEAddress，但这个控件在双击时
会造成程序无响应，等等，一切有用的资料，都是我收集的对象，同时也为后来人提供
一些有用的帮助！

为什么大富翁都变得无动于衷？

参与本贴讨论的高手，可以帮我看看一个ie相关的问题
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1477554

UP

gz

gz

帮你提

我来说说第一个吧。
1.EmbeddedWB如何在XP下有主题视觉效果。

IDocHostUIHandler::GetHostInfo
typedef struct _DOCHOSTUIINFO {
ULONG cbSize;
DWORD dwFlags;
DWORD dwDoubleClick;
OLECHAR *pchHostCss;
OLECHAR *pchHostNS;
} DOCHOSTUIINFO;

dwFlags
One or more of the DOCHOSTUIFLAG values that specify the UI capabilities
of the host.

DOCHOSTUIFLAG Enumerated Type

------------------------------------------------------------------------------
Defines a set of flags that indicate the capabilities of an IDocHostUIHandler
implementation.

Syntax

typedef enum tagDOCHOSTUIFLAG {
……,
DOCHOSTUIFLAG_THEME = 0x00040000,
DOCHOSTUIFLAG_NOTHEME = 0x00080000,
DOCHOSTUIFLAG_NOPICS = 0x00100000,
DOCHOSTUIFLAG_NO3DOUTERBORDER = 0x00200000
} DOCHOSTUIFLAG;

Constants

DOCHOSTUIFLAG_THEME
Internet Explorer 6 or later. Specifies that the hosted browser should use
themes for pages it displays.

DOCHOSTUIFLAG_NOTHEME
Internet Explorer 6 or later. Specifies that the hosted browser should not
use themes for pages it displays.

DOCHOSTUIFLAG_NOPICS
Internet Explorer 6 or later. Disables PICS ratings for the hosted browser.

DOCHOSTUIFLAG_NO3DOUTERBORDER
Internet Explorer 6 or later. Turns off any 3-D border on the outermost frame
or frameset only. To turn borders off on all frame sets, use DOCHOSTUIFLAG_NO3DBORDER

THX!不过能说说楼上的代码怎么用吗？

Next，翻出CathyEagle老大以前写的东东看看：
http://eagleboost.myrice.com/issues/Materials/Articles/TWebBrowser.htm

高手少了很多了

贴主可能不太了解现在地世道了，高手全部到国外的坛子去混了，我曾经有一段时间对
WebBrowser感兴趣，找到一个好地方

http://groups.yahoo.com/group/delphi-webbrowser

我总感觉中国 IT 业人士好像不喜欢邮件列表、新闻组、IRC之类的交流方式，倒是喜欢
逛论坛，论坛慢而且无法保证所有人看到，而邮件列表发个邮件全列表的人都会收到，一
般每个列表都有几个高手坐阵，开坛授课还热心的很，那里像这里，高手都缩在后面当看
客，碰到有把握的问题只是简单提提，没有把握的也不参加讨论，怕说错了丢人，身份架子
倒是十足，分明是拿着不给吗

跟你说吧，我在论坛也有一 ID 在总排名百名以内，我这是换个马甲特意出来骂骂的，包括
骂骂我自己！

*/. . . * . * 祝
./* . [] * .__ 你
? */ . .//~~~~~~~~~~~~'/. | ◆ 快
/* ,/,./,...........,/.| ◆ . 乐
|| ..▎# ▎田 田 ▎ | ▎◆ ！
|| &&▎ ▎ ▎'|'▎ o ..
|| ##■■■■■■■■■■〓▄▃▂▁
祝事业有成!

To 钞票:
可以介绍几个好一点的新闻组吗？

用过TEmbeddedWB的OnGetHostInfo事件吧？
function TForm1.EmbeddedWB1GetHostInfo(var pInfo: TDOCHOSTUIINFO): HRESULT;
begin
with pInfo do
begin
cbSize := SizeOf(pInfo);
dwFlags := $000040000;//DOCHOSTUIFLAG_THEME
end;
Result := S_OK;
end;

我没有遇到过动态创建事件后无法响应的情况。

太好了，谢谢你CathyEagle。

不知道谁有用IEAddress，这个控件在双击时会造成程序无响应，该怎么办？

学习