Delphi记录程序的错误信息

记录应用程序使用中的错误信息，已备修补BUG.版本升级．将错误信息继续写入到文件中，窗口可闪动，引起注意，错误提示格式示例：应用程序：Project1 　　日期时间：2013-06-12 10:12:53 　　错误信息：'12.AD' is not a valid floating point value 　　错误类型：EConvertError 　　错误对象：TPanel