Question

delphi7用DBEdit输入时如何实现检错提示功能

详细点，编码是怎么样的呢？OnKeyPress又是怎么样啊？我是用delphi7做的一个管理系统，比如，我在里面用了几个DBEdit控件，程序运行时我想实现功能，即在如果其中一个DBEdit内容输入为空，我的系统能提示出错了

Answer 1

在ONExit 事件里写：
if trim(DBEdit1.Text)='' then
begin
showmessage('输入不能为空！');
exit;
end;

Answer 2

你要在字段的OnValidate事件中，校验
剩下的应该会了吧，希望你成功
procedure OnValidate……
begin
if 字段＝'' then
begin
showmessage('请输入数值');
获取表格焦点……
………
……
end
end;

Answer 3

使用MaskEdit组件。
或是通过输入相关的事件，如OnKeyPress，编码处理。

Answer 4

出错原因：这个dbeidt所对应的数据库字段被设置为不可为空或者是该字段为主键（执行exit事件后会报错）

在tab beforepost 事件下做是否为空判断