某些函数在执行的过程中可能会自动抛出异常,或者被手动Raise抛出异常,这个时候如果没有异常处理运行就会终止。使用异常处理则可以保护程序继续执行,并可以对异常进行相应的处理。异常的信息可以由ExceptObject对象获得,异常处理使用如下模式:
Try
被保护的程序执行段
Except
异常处理程序段
End;
例如:
Try
I:=StrToInt(S); //当S不能转换为整数的时候会产生异常。
Except
I:=0; //当发生异常的时候设置I为0;
Writeln(ExceptObject.ErrInfo);
End;
对于某个程序段可能出现中途返回或者退出,或者中途被异常中断,而某些代码必需要在其后执行的,则采用如下模式:
Try
被保护的程序执行段
Finally
保证执行的处理程序段,即便Try Finally之间的语句有返回或者异常产生。
End;