在BCB中记录现场错误信息

当程序交给客户后，运行一段间时后才发生了未知的错误，程序员一般就得不到准确的错误现场信息，最好程序自己能进行记录。特考虑如下代码，有更好的方法欢迎提出：

在主单元中定义错误处理程序如下：Unit1.h        void __fastcall AppException(TObject *Sender, Exception *E);

Unit1.cppvoid __fastcall TForm1::FormCreate(TObject *Sender){    Application->OnException = AppException;}

void __fastcall TForm1::AppException(TObject *Sender, SysUtils::Exception *E)

{    //然后可在文件中记录如下三类信息    //__FILE__;　　源文件名称    //__LINE__;　　源文件错误发生行号    //Now();　　　 错误发生时间     Application->ShowException(E);}

第一次发文档，看看效果，不要见笑欢迎交流：lih0712@163.net