怎样在程序里面调用附件里面的计算器？

Question

uses ShellAPI;procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle, nil, 'calc.exe', nil, nil, SW_SHOW);
  WinExec('calc.exe', SW_SHOW);
end;

Answer 1

WinExec(PChar('...任何可執行文件都可以'), SW_SHOWNORMAL);

Answer 2

WinExec(PChar('D:\Adobe\Photoshop 6.0、Photoshp.exe  c:\123.bmp'),SW_SHOWMAXIMIZED);UINT WinExec(    LPCSTR lpCmdLine,// address of command line 
    UINT uCmdShow // window style for new application 
   );CmdShow Long，为窗口指定可视性方面的一个命令。请用下述任何一个常数 
SW_HIDE 隐藏窗口，活动状态给令一个窗口 
SW_MINIMIZE 最小化窗口，活动状态给令一个窗口 
SW_RESTORE 用原来的大小和位置显示一个窗口，同时令其进入活动状态 
SW_SHOW 用当前的大小和位置显示一个窗口，同时令其进入活动状态 
SW_SHOWMAXIMIZED 最大化窗口，并将其激活 
SW_SHOWMINIMIZED 最小化窗口，并将其激活 
SW_SHOWMINNOACTIVE 最小化一个窗口，同时不改变活动窗口 
SW_SHOWNA 用当前的大小和位置显示一个窗口，不改变活动窗口 
SW_SHOWNOACTIVATE 用最近的大小和位置显示一个窗口，同时不改变活动窗口 
SW_SHOWNORMAL 与SW_RESTORE相同
呵呵,不知帖了多少次了

Answer 3

WinExec('calc.exe', SW_SHOW);能用是因为在你的PATH
中已有
PATH=C:\WINDOWS\;C:\WINDWOS\COMMAND所以你不需要加路径了