我在后台数据库(InterBase)写了一个判断用的过程.....写的是有关记录的判断分类...在里面由一些exception 的错误提示...
现在我在Delphi处理是,
if not 出现错误提示 then
begin
...
....
end;
就是后台数据库有出现错误提示,就不做任何事
现在我在Delphi处理是,
if not 出现错误提示 then
begin
...
....
end;
就是后台数据库有出现错误提示,就不做任何事
解决方案 »
- dbgrideh对汇总后的值再汇总问题
- 连接问题,谁帮帮我啊。好难!
- 如何全屏显示
- CommandText有字符串长度限制吗?
- 请问:我在窗体的onshow事件中调用了buildtree自定义过程,产生treeview各个结点,错误在哪里??
- DBGRIDEH 有多个字段,想横向比较,只有CELL 中不为0的记录有不相同的,即在一个字段表示为NO
- 安装了一个软件后,卸载后,把BDE也给我卸载了,该如何恢复我的BDE。
- mis的登陆窗口应该怎样被引导出来????????????//
- 一个让我痛苦已久的问题,望各路高手鼎立相助!!!
- 关于DELPHI的COM+的组件的远程配置的问题
- 怎么样调用Dll中的子窗体
- 前台使用触发器,如何得到该触发器的执行情况呢......
.......
.....
...........
exceptend;
.......
.....
...........
except //当出现错误提示时执行以下代码.
//这里就是你需要执行的代码.
end;
如,我在数据库exception '出错.'
我在Delphi接收下来,不让提示,而是由我写储如.Application.Messagebox()来处理呢.....
.......
.....
...........
exceptend;
//你的数据库操作
except
//错误处理代码
end;在 Debugger 模式下,你还是可能看到原来的提示消息,运行 exe 文件则只出现你写的提示。
在 Debugger 模式下,可以屏蔽原来的提示消息,在 Tools|Debugger Options-->Language Exception 中添加该异常类型即可
//你的数据库操作
except
//错误处理代码
end;
...
except
on E:Exception do
Application.MessageBox(pchar(e.message),'系统提示',mb_OK+mb_iconwarning);
end;
知道了是这样的,
但有个问题,就是,我在数据中自定义了一些错误提示信息,为什么总是提示:
Execption ID +ExecPtion Text...两者的内容...可不可以不要Execption ID
try ...
except
on EZeroDivide do HandleZeroDivide;
on EOverflow do HandleOverflow;
on EMathError do HandleMathError;
else
HandleAllOthers;
end;
//开始事务
//数据库操作
//提交事务
except
//回滚事务
raise;
end;//??