在Delphi里面怎么样才能调用WORD？？

各位大侠：
    我想在Delphi里面调用一篇Word文章，我该怎么实现呢？最好有一小段程序！谢谢了！！！！

解决方案 »

  1.   

    form中放两个控件wordApplication1、worddocument1。procedure TForm1.Button1Click(Sender: TObject);
    var
      Filename,PasswordDocument,PasswordTemplate,WritePasswordDocument,
      WritePasswordTemplate,Encoding,ConfirmConversions,ReadOnly,
      AddToRecentFiles,Revert,Visible,Format,ItemIndex:olevariant;
    begin
      {联接WORD}
      wordapplication1.connect;
      wordapplication1.visible := true;
      FileName := '路径\文件名.doc';
      ConfirmConversions:= False;
      ReadOnly:=False;
      AddToRecentFiles:=False;
      PasswordDocument:='';
      PasswordTemplate:='';
      Revert:=True;
      WritePasswordDocument:='';
      WritePasswordTemplate:='' ;
      Format:=wdOpenFormatDocument;
      Visible := true;
      Encoding := '';
      {打开一个指定的WORD文件}
      WordApplication1.Documents.Open(FileName,ConfirmConversions,ReadOnly,
      AddToRecentFiles, PasswordDocument, PasswordTemplate,Revert,
      WritePasswordDocument, WritePasswordTemplate, Format, Encoding, Visible);
      ItemIndex:= 1;
      WordDocument1.ConnectTo(WordApplication1.Documents.Item(ItemIndex));
      WordApplication1.Options.CheckSpellingAsYouType := False;
      WordApplication1.Options.CheckGrammarAsYouType := False;
    end;
      

  2.   

    uses ShellAPI;shellexecute(0, 'open', 'c:\temp.doc', nil, nil, SW_SHOW);自己指定相应的路径就可以了
      

  3.   

    jan2002(阿吉)的方法挺简单,如果仅仅是打开WORD文档用jan2002(阿吉)的方法就最好了,如果还要在程序中控制WORD最好用我的方法.