为了防止程序出现错误，请问如何拦截错误并处理错误!!100分

Question

举个最简单的例子吧。
题：把一个字串转成整数。
解答：iInt := StrToInt(strStr);可能出现的错误： strStr要不是一个合法的数字串，将出现EConvertError 类型的错误。处理错误的解答：
  try //try 块中可能会有错误发生
    iInt := StrToInt(strStr);
  except //如果真有错误发生那么...
    On E:EConvertError do //如果是EConverError类型的错误
    begin
      iInt := 0;  //那么结果缺省为0  ----你如果不想用某个缺省值，也可以作其它的补救
    end
  end; //Try块结束。上述过程其实是StrToIntDef函数的标准处理过程，希望对你有帮助。

Answer 1

老兄有没有学过Delphi?异常处理是入门啊！

Answer 2

   try
     ...  //执行可能出错的语句
   except //如果出错
      on e:exception do  //也可指定错误类型，看楼上的，exception为不明确指定
           showmessage(e.message)；//显示错误列类型
         //也可是其它错误处理语句
   end; 
 也可try 与finally组合
  try
   ...
  finally //用来释放资源
   ...
  end;
 但不允许这样用：
 try
  ..
  except
    ..
 finally
  ..
 end;
 
try可嵌套  
 如
  try
   try
    except
      ...
    end;
  finally
  end;