使用ShellExecute函数(属于ShellAPI单元)
首先在uses里面声明shellapi。
然后设置创建一个Button,键入代码如下
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(handle,'open','D:\program.exe','','',SW_SHOWNORMAL);
close;
end;
其中D:\为指定路径,program.exe为指定.exe文件。路径文件可修改可设置远程访问。
远程访问例\\192.168.1.10\share\program.exe
share为文件夹名,该文件夹需设置为共享文件。