能为小弟讲一下 try...except(finally)结构究竟能处理什么样的异常吗?(100分)

  • 主题发起人 主题发起人 蛤蟆跳井,不懂不懂
  • 开始时间 开始时间

蛤蟆跳井,不懂不懂

Unregistered / Unconfirmed
GUEST, unregistred user!
下面这两段代码都是在贴子上copy下来的,可根本不能正常运行的。


1:如何判断一个文本类型的是不是数字?
try
strtoint(str1)
except
showmessage('此字符串不是数字')

2:字符转日期
try
DA:=StrToDate(edit1.text)
EXCEPT
SHOWMESSAGE('输入错误');
exit;
end;
 
这段代码怎么到这个帖子来了?

不是说了用datatimepicker码!
 
這兒有一個大討論﹐你看吧。http://www.delphibbs.com/delphibbs/dispq.asp?LID=712578
 
各位且别见笑,听我再把问题说清点,我是说:
如果str1不能转换,那不就是触发异常了吗? try 语句不是有保护作用的吗? 那是不是
说不论 except或finally后面是什么,try后面的异常将不会造成程序执行的异常终止?
如果是这样,那上面两代码在str1和edit1.text不能转换时就应出现消息框才对,而不会
造成程序出错。

问题很菜,请不要见笑,否则5555555555555555555555555555555555555555……
 
1:如何判断一个文本类型的是不是数字?
try
strtoint(str1)
except
showmessage('此字符串不是数字');
[blue] exit;
end;[/blue]
这样可以运行,然后运行exe文件的时候,就会弹出'此字符串不是数字'的窗口,
exit是为了不运行下面的代码.
要知道设计期和运行期的区别.
 
这个问题是很简的,你在调试程序的时个它可能引发一个错误而没用到except下面的语句。
但如果你编译好后,再运行xx.exe则就会出现showmessage了,道理吗,我也说不明白,呵呵~~
 
YES!这就是设计期和运行期的区别!
调试是一回事,运行又是一回事!
 
试过了!试过了!知道了!知道了!
临贴涕零,不胜感激!多谢!多谢!(:D
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
590
import
I
后退
顶部