TempFile := '你的文件名';
ShellExecute(Handle, 'OPEN', TempFile, nil, nil, SW_SHOWNORMAL);--The end;

解决方案 »

  1.   

    uses
      shellapi;
    {$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);
    begin
      ShellExecute(Handle,'open','c:\dcom.doc','','',SW_SHOW);
    end;
      

  2.   

    你问的问题太简单,用CreateOleObject的方法创建Word对象或用delphi带的Vcl也可以,具体方法你找一下以前的贴子,怎么这么懒!!??
      

  3.   

    提示错误为:[Error] Unit1.pas(28): Undeclared identifier: 'ShellExecute'
      

  4.   

    Winexec(path+filename,1)自己在试一下!
      

  5.   

    呵呵,我的测过,你要
    uses
      shellapi;