TSL语言基础 > TSL语言基础 > 流程控制语句 > 错误控制,以及调试语句

异常处理    

  •   某些函数在执行的过程中可能会自动抛出异常,或者被手动Raise抛出异常,这个时候如果没有异常处理运行就会终止。使用异常处理则可以保护程序继续执行,并可以对异常进行相应的处理。异常的信息可以由ExceptObject对象获得,异常处理使用如下模式:
    Try
    被保护的程序执行段
    Except
    异常处理程序段
    End;

    例如:
    Try
    I:=StrToInt(S); //当S不能转换为整数的时候会产生异常。
    Except
    I:=0; //当发生异常的时候设置I为0;
      Writeln(ExceptObject.ErrInfo);
    End;

    对于某个程序段可能出现中途返回或者退出,或者中途被异常中断,而某些代码必需要在其后执行的,则采用如下模式:
    Try
    被保护的程序执行段
    Finally
    保证执行的处理程序段,即便Try Finally之间的语句有返回或者异常产生。
    End;