DELPHI 获取错误信息 

try
     ....(需要执行的代码)
except
  on e:exception do
     application.MessageBox(pchar(e.Message), '错误提示', 0);
end;
posted @ 2013-11-27 10:09  內個誰²º¹³  阅读(128)  评论(0)  编辑  收藏  举报