try...except怎么用?

Question

在Ide弹出ide系统的出错框是吗？点击确定再继续运行，你定义的ShowMessage(E.ClassName + CRLF + E.Message);这句就会起作用了，这不是什么bug,而是delphi错误的处理机制。如单独执行.exe，ide的出错框就不会出现，直接出现你处理错误的对话框了。

Answer 1

const  CRLF = #13 + #10;
var
  TempDate: TDateTime;
begin
  try
    TempDate := StrToDateTime('99/99/1998');
  except
    on E: EConvertError do
      ShowMessage(E.ClassName + CRLF + E.Message);
  end; ///
end;

Answer 2

luoweicaisd(笑三少) 所言及是

Answer 3

这是为了方便在delphi调试，如果你编译了的程序如果出现错误就会弹出你要求的错误码，而且不会退出程序.