WordApplication 和 WordDocment 有什么区别?怎样使用,简单说一下就可以了,我实在找不到帮助

解决方案 »

  1.   

    以下是打开word的一段code;
    procedure TForm1.Button1Click(Sender: TObject);
    var
      ItemIndex :OleVariant;
      FileName, ConfirmConversions, ReadOnly, AddToRecentFiles,
      PasswordDocument, PasswordTemplate, Revert,
      WritePasswordDocument, WritePasswordTemplate, Format,encoding,visible: OleVariant;
    beginif not OpenDialog1.Execute then
      Exit; {Open document}
      FileName:= OpenDialog1.FileName;
      ConfirmConversions:= False;
      ReadOnly:= False;
      AddToRecentFiles:= False;
      encoding:=true;
      PasswordDocument:= '';
      PasswordTemplate:= '';
      Revert:= True;
      WritePasswordDocument:= '';
      WritePasswordTemplate:= '';
      Format:= wdOpenFormatDocument;  WordApplication1.Documents.Open(FileName,ConfirmConversions,ReadOnly,AddToRecentFiles,PasswordDocument,PasswordTemplate,Revert,WritePasswordDocument,WritePasswordTemplate,Format,Encoding,visible);
      ItemIndex:=1;
      WordDocument1.ConnectTo(WordApplication1.Documents.Item(ItemIndex));
      WordApplication1.Visible:=True;  {Turn Spell checking of because it takes a long time if enabled and slows down Winword}
      WordApplication1.Options.CheckSpellingAsYouType := False;
      WordApplication1.Options.CheckGrammarAsYouType := False;
    end;