异常处理语句,有两种第一种try d := 6 div 0; //明显错误,会抛出异常.除数不能为0except on E:Exception do ShowMessage(e.message)
; // 在这里处理你的异常,偶这里显示出错误消息,当然可以自己定义end;第二种a := TStringList.createtry a.add('1'); Showmessage(a.strings[2])
; //明显错误,程序异常中断不使用异常处理代码的将不会执行到a.free,如果使用了try ..finally..end; 不管异常是否出现都将释放资源finally a.free; //释放end;