应用程序将自动调用 HandleException 方法,并将显示一个提 示有错误发生的对话框。除非异常对象是 EAbort,此时 HandleException 将调用 OnException 句柄(如果存在),否则将调 用 ShowException 显示一个提示有错误发 生的对话框 方法 UnhookMainWindow UnhookMainWindow 方法用于释放由 HookMainWindow 方法挂在主窗体的程序。 定 义 如 下 : type TWindowHook = function(var Message: TMessage): Boolean of object;procedure