如何判断OLE对象是否存在？

Question

比如我写下面这段话  var 
Word, Doc: variant; 
begin 
Doc:= CreateOleObject('Word.Document'); 
Word := Doc.Application;
Word.Visible := True; 
end;
我如和通过DOC和WORD这两个Variant是否存在，比如当我把WORD对象打开的时候，这两个值应该是什么？当我关闭的时候，这两个值应该是什么？

Answer 1

应该是无法判断，这取决于你的ole方法的返回值。你可以考虑这样处理，先给word或doc赋值一个初始值比如Emptyparam,然后再你的ole方法调用后再去判断是否与初始值相等，来确定是否已经成功取得ole对象。