如何在同一窗口启动Word(10分)

  • 主题发起人 主题发起人 D_LOVER
  • 开始时间 开始时间
D

D_LOVER

Unregistered / Unconfirmed
GUEST, unregistred user!
TWordApplication启动的word是打开了另一个窗口,有什么办法能和调用窗口处
在一个窗口,就象用TOleContainer找开的一样
 
可以用wordapplication1.active打开同一窗口的word。
 
用GetActiveOLEObject得到已打开的Word
 
我对此也比较关心
能否说清楚一些?
最好有个例子
 
procedure TForm1.FormCreate(Sender: TObject);
var
obj_Acad ,obj_Doc: OleVariant;
begin
try
obj_Acad:=GetActiveOleObject('AutoCAD.Application.14');
except
obj_Acad:=CreateOleObject('AutoCAD.Application.14');
end;
obj_Acad.Visible:=True; //重要
obj_Doc:=obj_Acad.ActiveDocument;
end;
 
后退
顶部