请问delphi的异常捕捉问题(100)

  • 主题发起人 主题发起人 ilikecs
  • 开始时间 开始时间
I

ilikecs

Unregistered / Unconfirmed
GUEST, unregistred user!
try FileListBox1.Directory := strpath; except On E:Exception do raise Exception.Create('无法打开!'+E.Message);end;上面这段代码,如果strpath是一个光驱并且没有光盘时会触发异常,但是在except语句执行前程序已经跳出出错对话框,不知道应该怎么处理,才能不让系统提示,而是用except里面的代码?
 
先判断根目录是否存在。 if NOT DirectoryExists('G:/') then ShowMessage('没光盘');
 
一样回出错!只能用 lopen
 
我用的是XP,Delphi7编译运行的,没异常。不知道楼上的环境是什么。
 
你调试的时候肯定会出来 但直接运行程序就不会出来的 我d6用了也没有什么问题啊!
 
try except begin abort; showmessage('无法打开'); endend
 
对,你试试不要在Delphi环境里运行程序,而是直接运行,看看异常情况。
 
经过测试znxia的方法可行,谢谢!
 
后退
顶部