抛异常问题，请各位高手帮我解决，在线等！！！！！！！！

Question

内容如下：procedure TForm1.Button1Click(Sender: TObject);
var a,b:integer;
begin
  a:=0;
  b:=20;
  try
    showmessage(floattostr(b*1.0/a));//除以出错！
  except
     on exception do  showmessage('出错啦！');
  end;
end;为什么except接不到异常？但程序又报错，请各位帮我解决!!end.

Answer 1

这是delphi的机制，你单击运行生成的.exe文件，就会提示'出错啦！'，而你在调试时会在try
    showmessage(floattostr(b*1.0/a));//除以出错！处出错。

Answer 2

出错之后就不会再继续运行下一步了，因为是调试状态嘛。
而生成的.exe文件会提示错误的

Answer 3

因为你用“出错拉”来代替了出错的信息。你可以这样改except
on e:exception do
showmessage(e.Message);end;这样就会捕捉到错误了。

Answer 4

前几天刚在一个帖子里面讨论过，搂住看看这个吧
http://community.csdn.net/Expert/topic/3999/3999721.xml?temp=.9356653