有谁知道开始菜单里那个“运行”使用的什么函数?(100分)

  • 主题发起人 主题发起人 panjf
  • 开始时间 开始时间
P

panjf

Unregistered / Unconfirmed
GUEST, unregistred user!
我用ShellExecute,WinExec都不能完成它的功能。
 
你使用Start 呢?
 
你到底要什么样的功能?
 
同意yzhshi
 
ShellExecute,WinExec可以达到相应的功能的啊,不知道你是不是调用出了问题?
 
我想实现在edit中输入网址打开ie,输入路径打开目录,输入应用程序名执行应用程序
如果都不是则报错。
我试着用那两个函数,先用winexec判断是否为应用程序,不是则用shellexecute用ie打开,
可是如果遇到都不是的情况只会出现ie“找不到服务器”的提示,这个错误捕捉不到,
请问各位有什么好办法?

to yzhshi,
什么意思?我没找到这个函数呀,在哪里?
 
你发一个 Win + R 键消息吧,呵呵
 
我不想把它调出来,只想完成它的功能
 
rv:=ShellExecute(handle, 'open', '网址或应用程序', nil,nil, SW_SHOWNORMAL);
if rv=ERROR_FILE_NOT_FOUND then
showmessage('应用程序不存在!');
这样不行吗?
 
这样是可以,可是如果输入的是网址他不会打开新的窗口。
也就是说如果现在桌面上没有开启ie,那么他打开一个ie显示网页,如果有的话就会用已
打开的这个ie窗口显示,有没有办法让它新开一个?
 
url:='网址或程序';
if (pos('HTTP://',UpperCase(url))=1) then
ShellExecute(Handle,'open','IEXPLORE',url,nil,SW_SHOWNORMAL)
else
ShellExecuteA(Handle,nil,url,nil,nil,SW_SHOWNORMAL);
 
接受答案了.
 
后退
顶部