try.. except..怎样用?有try..except..else 吗?(只有5分了)(5分)

  • 主题发起人 主题发起人 gravel
  • 开始时间 开始时间
G

gravel

Unregistered / Unconfirmed
GUEST, unregistred user!
try ...
except 出错处理;
假设如果不出错,我就执行aaa这过程,那aaa应放在哪里?
 
try
//......
except on exception do
begin
//show error message
end;
finally
aaaa;
end;
 
hehe,5分也要,都别跟我抢
 
当然没有try ..except..else
只有出错和不出错两种情况else有什么用
try
aaa
except
on ..do
..
end;
其中on子句就是你要处理的错误类。
如aaa中如果有除0的情况那么就有可能引发
EDivByZero
可写为
on EDivByZero do
ShowMessage('不能除0');
也可以自己从exception导出自己的错误类。
 

var
ExceptionRaised:Boolean;
begin
ExceptionRaised := false;
try
do something;
except
do something if exception were raised;
ExceptionRaised := true;
end;
if not ExceptionRaised then
begin
do something if exception not be raised
end;
 
1. try
2. a := 3 div 0;
3. aaa
4. except
5. 错误处理
6. end;

try 和 except之间的语句是要保护的语句,
2.对应可能出错的语句.如果try和except之间的语句没有出错误,
那么try和except之间的语句都执行,但Except和end之间的语句不执行.
如上,2出错,3不执行,执行Excpet和end之间的语句,即错误处理.
 
?!
为什么总是有人不去认真看看帮助文档呢?
 
try 后跟两种处理方式
except 出错后执行,通常可用于截获错误类型,进行相应处理
finally 不管出不出错总执行,可用于释放资源等操作
 
嗯,同意kangxy的。
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
744
DelphiTeacher的专栏
D
后退
顶部