S
summerlian
Unregistered / Unconfirmed
GUEST, unregistred user!
程序有两个按钮,第一个按钮执行一个外部程序,外部程序启动后,按第二个按钮,弹出一个
Opendialog,让用户选择一个路径,比如说A盘,从其中导入若干数据进入,
导完后,再按第一个按钮,试图再次执行外部程序时,却一个劲的读软盘,提示启动外部程序
失败.
代码如下:
execdir:=main.pathstr+'Card/callIDcom1.exe';
main.pathstr是系统启动时得到的外部程序所在路径
ShellExecute(0, 'open',pchar(ExecDir), nil, nil, 0);
我showmessage出execdir的值是正确的路径,但执行时,却总是在读A盘,请各位高手指教!
给100分,第一次来向各位富翁请教,请多支持
Opendialog,让用户选择一个路径,比如说A盘,从其中导入若干数据进入,
导完后,再按第一个按钮,试图再次执行外部程序时,却一个劲的读软盘,提示启动外部程序
失败.
代码如下:
execdir:=main.pathstr+'Card/callIDcom1.exe';
main.pathstr是系统启动时得到的外部程序所在路径
ShellExecute(0, 'open',pchar(ExecDir), nil, nil, 0);
我showmessage出execdir的值是正确的路径,但执行时,却总是在读A盘,请各位高手指教!
给100分,第一次来向各位富翁请教,请多支持