这样打开WORD文档为什么出错？(30分)

用下面的事件打开一文档，当WORD是已运行时没有问题，但当WORD是未运行状态，则出现如下错误提示：[系统为WIN2000]

Project Project.exe raised exception class EOleSysError with message'操作无法使用'.Process stopped.Use Step or Run to continue.

procedure TForm1.Button1Click(Sender: TObject);
var
Word_Handle, Doc_Handle: OleVariant;
Word_Button: OleVariant;
begin
try
Word_Handle := GetActiveOleObject('Word.Application');
except
try
Word_Handle := CreateOleObject('Word.Application');
except
Exit;
end;
end;
Word_Handle.Visible := True;

Doc_Handle := Word_Handle.Documents.open(FileName := 'C:/1.doc');

end;

废话！GetActiveObject 当然要返回错误了,你自己处理掉不就行了吗？
如果出错了,你再自己
Createobject('Word.Application') 不就可以了吗

你这样作是对的。

to_itren:
'GetActiveObject 当然要返回错误了,你自己处理掉不就行了吗？'
怎么说呢？

直接CREATE不会有什么问题的

多人接受答案了。