调用其它可执行程序(比如计算器)
uses shellapi
ShellExecute(0,'Open',ExeName,nil,nil,SW_SHOW)
ExeName:='C:WinNTSystem32Calc.exe';
也有可能系统不安装在C盘,建议把Calc.exe拷到程序的运行文件下
ExeName:=pchar(ExtractFilePath(Application.ExeName)+'Calc.exe')
uses shellapi
ShellExecute(0,'Open',ExeName,nil,nil,SW_SHOW)
ExeName:='C:WinNTSystem32Calc.exe';
也有可能系统不安装在C盘,建议把Calc.exe拷到程序的运行文件下
ExeName:=pchar(ExtractFilePath(Application.ExeName)+'Calc.exe')