如何启动WORD而且使之不可见？

Question

如何启动WORD而且使之不可见？

Answer 1

winexec(pchar('C:\Program Files\Microsoft Office\Office\winword.exe'),sw_hide);

Answer 2

try
    Wordapplication.Connect;
  except
    MessageDlg('Word may not be installed', mtError, [mbOk], 0);
    Abort;
  end;
  Wordapplication.Visible := False;
  WordApplication.Caption := 'Delphi automation';

Answer 3

uses comobj
procedure TMainForm.TransferClick(Sender: TObject);
var
  MsWord,Doc:OleVariant;
begin
  MsWord:=CreateOleObject('Word.Application');
  //MsWord.Visible:=True;
  MsWord.Documents.Add;
  Doc:=MsWord.ActiveDocument; 
  MsWord.Quit;
end;

Answer 4

Wordapplication.Visible := False;

Answer 5

1.不使用msword.appshow;
  var msword:olevariant;
begin
  msword:=creatoleobject('word.basic');
  //msword.appshow;  //在屏幕上显示word窗口
  msword.filenew('Normal');
  ...2.winexec(pchar('C:\Program Files\Microsoft Office\Office\winword.exe'),sw_hide);