用药RichEdit1读入WORD文件后打印

解决方案 »

  1.   

    var
      Doc,WordApp: Variant;
    begin
      try
        WordApp:=CreateOleObject('Word.Application');
        //WordApp.Visible:=true;
        Doc:=WordApp.Documents.Open('c:\a.doc');
        Doc.PrintOut;
      finally
        WordApp.Quit;
      end;
    end;
      

  2.   

    var
      Doc,WordApp: Variant;
    begin
      try
        WordApp:=CreateOleObject('Word.Application');
        //WordApp.Visible:=true;
        Doc:=WordApp.Documents.Open('c:\a.doc');
        Doc.PrintOut;
      finally
        WordApp.Quit;
      end;
    end;
      

  3.   

    xxmmmx(踢踏) :但是这样要求用户一定得装WORD是吗?