怎样使用DELPHI开发的ACTIVEX控件得到MS Word的_Application?(300分)

我用DELPHI做一个ActiveX控件，我希望在Word中得到_Application接口。请问各位高手我该怎么做？谢谢！

uses
ComObj;

var
WordApp: Variant;
WordApp:=CreateOleObject('Word.Application');

你没有理解我的意思。
我的ActiveX控件在Word中加载的，我要获取的是当前Word的接口。
在IE中可以得到IWebbrowser2接口，使用下面代码。
isp := ActiveFormControl.ClientSite as IServiceProvider;
if (isp.QueryService(IWebbrowserApp, IWebbrowser2, browser) = S_OK) then
begin
ShowMessage('Browser URL is := ' + browser.LocationURL);
end;
在Word中如何得到Application或Documents，请问各位高手我该怎么做？谢谢！

http://delphibbs.com/delphibbs/dispq.asp?lid=737517

接受