怎样判断WORD已启动及WORD连接的代码(20分)

L

lyzhuo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-14

• #1

1.如果WORD未启动，启动WORD先用Connect还是createoleobject('word.application')
2.判断word是否在内存中，用Getactiveoleobject('word.application')会报错。还有其它办法吗？

 

Z

zla

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-05-14

• #2

这样应该就可以了

 

M

manana

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-06-02

• #3

问题2，当系统中没有启动Word的时候，调用时就会出现“非法调用”的错误！
试试这样：
myword: Variant;
begin
try
myword := GetActiveOleObject('Word.Application');
except
myword := CreateOleObject('Word.Application');
end;