Z
zwwhb
Unregistered / Unconfirmed
GUEST, unregistred user!
我的程序当发生意外时就死了，比如我用DELPLHI自带的报表控件做了一个报表，但如果使用的电脑
没有安装打印机，而用户又按了设置打印机按钮，则程序会死，必须结束该程序，再启动才行。我定义了一个类，可以铺获全局错误
错误是铺获到了，但还是不能正常退出。我是这样写的
type
TGlobalExHandler = class
public
procedure HandlerProc(sender: Tobject; EInstance: Exception);
end;
procedure TGlobalExHandler.HandlerProc(sender: Tobject; EInstance: Exception);
begin
messagebox(0, '操作或输入错误!', '警告', mb_ok xor MB_ICONWARNING xor MB_TASKMODAL);
exit;
end;
请问各位大虾有什么高招？
没有安装打印机，而用户又按了设置打印机按钮，则程序会死，必须结束该程序，再启动才行。我定义了一个类，可以铺获全局错误
错误是铺获到了，但还是不能正常退出。我是这样写的
type
TGlobalExHandler = class
public
procedure HandlerProc(sender: Tobject; EInstance: Exception);
end;
procedure TGlobalExHandler.HandlerProc(sender: Tobject; EInstance: Exception);
begin
messagebox(0, '操作或输入错误!', '警告', mb_ok xor MB_ICONWARNING xor MB_TASKMODAL);
exit;
end;
请问各位大虾有什么高招？