如何判断DOC文档当前是否正在被使用啊?

Question

在通过OLE打开一个word文档之前
如何判断DOC文档当前是否正在被使用啊?另:如何只读打开word文档.
  如何在文档第二行第二字符后面添加一串字符啊?

Answer 1

var
  FStrm: TFileStream;
begin
  try
    FStrm := TFileStream.Create('g:\RESUME.doc',fmOpenRead + fmShareExclusive);
  except
    ShowMessage('已经被别的程序打开！');
  end;
  ...............
end;—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

Answer 2

我希望是OLE的方法.
WordApp := CreateOleObject('word.Application');