这个问题用ComObj单元比较好解决，解答如下，看是否合适：
在你的Uses列表中加入Comobj单元
var myword:variant //定义word应用程序变量
begin
myword:=createoleobject('word.application');//将myword变量连接到word应用程序
myword.documents.open(filename:='mydoc.doc',readonly:=true);//打开word文档
myword.visiual:=true;//显示word应用程序，并打开mydoc.doc文档
end;
