为什么我的delphi7的TWebBrowser控件没有OnGetExternal事件？

「已注销」 2008-11-25 12:06:38

如题。
但是很多文章里都提到这个事件。

...全文

60 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

「已注销」 2008-11-26

打赏
举报

顶一下，希望有人能帮助我。。

yinxu 2008-11-26

打赏
举报

是：TEmbeddedWB控件吧！

panrongzeng 2008-11-25

打赏
举报

不用担心，我的TWebBrowser也没有，嘿嘿
也许这个事件不可视的、

genispan 2008-11-25

打赏
举报

哈哈也许别个用的是D5

「已注销」 2008-11-25

打赏
举报

引用budded以前发表的：
WebBrowser 有一个OnGetExternal事件，在这里实现：

wbBrowser.OnGetExternal := OnGetExternal;

...

function TfrmBrowser.OnGetExternal(out ppDispatch: IDispatch): HRESULT;
var
FIntf: TWebBrowserEvent;
begin
FIntf := TWebBrowserEvent.Create;

ppDispatch := FIntf;
Result := S_OK;
end;

...

/// Com Object

uses
ComObj, ActiveX, BrowserEx_TLB, StdVcl;

type
TWebBrowserEvent = class(TAutoObject, ISomeIntface)
protected
procedure Test; safecall;
function Get_GetMacAddr: OleVariant; safecall;
// do something, implement ISomeIntface
end

=======================================================
明明有这个事件的啊，为什么delphi7甚至delphi2009里都找不到呢