DELPHI运行外部程序
答案:2 悬赏:0 手机版
解决时间 2021-04-21 11:20
- 提问者网友:ミ烙印ゝ
- 2021-04-21 05:00
小弟不才,我怕大家看不明我就详细说说。以前我是用winexec ('cmd.exe /c strat d:\qq.exe',0);这种形式来运行的,但不懂如何配合ini使用,我要让不同的用户都可以自由设置路径的,让我写的程序一点就运行QQ,有啥办法?要配合ini使用的,太难我就不懂了。举个例子吧。小弟我麻烦大家了!
最佳答案
- 五星知识达人网友:由着我着迷
- 2021-04-21 05:38
使用ShellExecute(self.Handle,'open',pchar(filename),'','', SW_SHOW );
filename可以通过ini文件读入,使用ShellExecute时要Uses ShellApi;
全部回答
- 1楼网友:天凉才是好个秋
- 2021-04-21 06:20
需要手动添加的单元:IniFiles
procedure ReadConfig;//读取信息;
var
INI:TIniFile;
ExePath:String;
begin
INI:=TIniFile.Create(ExtractFilePath(Application.ExeName)+'config.ini');
try
ExePath:=INI.ReadString('FORM','ExePath','');
if FileExists(ExePath) then
WinExec(PAnsiChar(ExePath),SW_SHOW);
finally
INI.Destroy;
end;
end;
procedure SaveConfig(ExePath:String);//保存信息
var
INI:TIniFile;
begin
INI:=TIniFile.Create(ExtractFilePath(Application.ExeName)+'config.ini');
try
if FileExists(ExePath) then
INI.WriteString('FORM','ExePath',ExePath);
finally
INI.Destroy;
end;
end;我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯