出错提示???200分哦。(200分)

  • 主题发起人 主题发起人 柔情杀手
  • 开始时间 开始时间

柔情杀手

Unregistered / Unconfirmed
GUEST, unregistred user!
if FileExists(sysdir+'/Notepad.EXE') then<br>ShellExecute(handle,'open',pchar(SysDir+'/Notepad.EXE'),nil,nil,SW_SHOWNORMAL)<br>else<br>Showmessage('没有发现'+sysdir+'/Notepad');<br>为什么会出现下面的提示????<br><br>[Error] Unit1.pas(210): Undeclared identifier: 'ShellExecute'<br>
 
在use里加上shellapi
 
在Uses段 加入Shellapi即可。
 
接受答案了.
 
因为ShellExecute函数是DELPHI封装在shellapi单元上的,(WINDOWS上是 ShellExecuteA)<br>所以要在use里加上shellapi,它才能编译!
 
后退
顶部