用ShellExecute和WinExec函数调用就行了。

解决方案 »

  1.   

       
       win32 下最好用CreateProcess
      

  2.   

      uses ShellApi; 
     ShellExecute(Handle,nil,Pchar(Path),nil,nil,1);
    即可。
      

  3.   

    WinExec,要看你是怎么调用的了
      

  4.   

    Take it easy.
    For Example :
    uses shellapi;
    function ExecuteFile(const FileName, Params, DefaultDir: string;
      ShowCmd: Integer): THandle;
    var
      zFileName, zParams, zDir: array[0..79] of Char;
    begin
      Result := ShellExecute(Application.MainForm.Handle, nil,
        StrPCopy(zFileName, FileName), StrPCopy(zParams, Params),
        StrPCopy(zDir, DefaultDir), ShowCmd);
    end;調用 :ExecuteFile('c:\office\excel.exe', '', '', SW_SHOW);