请教:怎么调用可执行文件?

ssoft 2003-10-19 08:09:00
我把语法忘记了@
...全文
37 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
slchen 2003-10-19
  • 打赏
  • 举报
回复
ShellExecute要在unit处引用 ShellAPI

*: 启动一个程序

ShellExecute(Handle,'open',PChar('c:\test\app.exe'),

nil,nil,SW_SHOW);

* 启动记事本 (因为记事本在系统路径下,所以不必写完整的路径名了):

ShellExecute(Handle, 'open', PChar('notepad'),

nil, nil, SW_SHOW);

* 启动记事本并加载一个纯文本文件:

ShellExecute(Handle, 'open', PChar('notepad'),

PChar('c:\test\readme.txt', nil, SW_SHOW);

jianxin_js 2003-10-19
  • 打赏
  • 举报
回复
xuexi
huojiehai 2003-10-19
  • 打赏
  • 举报
回复
也可以用
winexec('d:\aa.exe',1)
g58521547 2003-10-19
  • 打赏
  • 举报
回复
SHELLEXECUTE函数中的字符串为没有结束符 的,要先转化他们
,还有就是可执行文件的应用程序路径要对,
ssoft 2003-10-19
  • 打赏
  • 举报
回复
怎么还有问题?

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Application.Handle,'open',PChar(ExtractFilePath(ParamStr(0))+
'centrex.exe '),'CARD',nil,SW_SHOWNORMAL)
end;
FSU 2003-10-19
  • 打赏
  • 举报
回复
ShellExecute(Application.Handle,'open',PChar(ExtractFilePath(ParamStr(0))+
'ExportPZFile.exe '),'CARD',nil,SW_SHOWNORMAL
ssoft 2003-10-19
  • 打赏
  • 举报
回复
shellexecute怎么说是没有定义标识符?
darji 2003-10-19
  • 打赏
  • 举报
回复
shellexecute(handle,nil,pchar,(程序名称),'','',0);
seasoft2003 2003-10-19
  • 打赏
  • 举报
回复
用VC如何调用别的可执行文件(exe)


方法一:

CFileFind ff;
if(ff.FindFile("sql.exe"))
{
ShellExecute(NULL,"open","sql.exe",NULL,NULL,SW_SHOW);
}
else
{
AfxMessageBox("文件没找到!");
}


方法二

CFileFind ff;
if(ff.FindFile("sql.exe"))
{
WinExec("sql.exe",SW_SHOW);
}
else
{
AfxMessageBox("文件没找到!");
}

pwzhu666 2003-10-19
  • 打赏
  • 举报
回复
winexe函数阿
还有楼上的shellexecute
redcola 2003-10-19
  • 打赏
  • 举报
回复
引用use ShellAPI

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧