dxDbgrid锁定焦点问题

womanlee 2003-08-22 08:17:17
在出现异常的时候,如何锁定dxDBGrid当前编辑的焦点??
我在数据集字段的onValidate事件中用如下代码:
if iRecCount<=0 then
begin
ShowInfo('输入的料品编码不存在,请重新输入!!');
Sender.FocusControl;
Abort;

end ;
if iRecCount>0 then
begin
adoQryT004LPMC.Value := GetNameFromCode('LPBM', cLPBM, 'LPMC', 'T002',
adoQryTmp);
adoQryT004LPDW.Value := GetNameFromCode('LPBM', cLPBM, 'LPDW', 'T002',
adoQryTmp);

end;
我发现“adoQryT004LPDW.Value := GetNameFromCode('LPBM', cLPBM, 'LPDW', 'T002',
adoQryTmp);

不过如何都会执行到??这是怎么回事??
...全文
32 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
yousoft2013 2003-08-22
  • 打赏
  • 举报
回复
iRecCount总是>0的。。
所以总会执行
chenquan 2003-08-22
  • 打赏
  • 举报
回复
if iRecCount<=0 then
begin
ShowInfo('输入的料品编码不存在,请重新输入!!');
Sender.FocusControl;
Abort;
end
else begin
adoQryT004LPMC.Value := GetNameFromCode('LPBM', cLPBM, 'LPMC', 'T002',
adoQryTmp);
adoQryT004LPDW.Value := GetNameFromCode('LPBM', cLPBM, 'LPDW', 'T002',
adoQryTmp);

end;
womanlee 2003-08-22
  • 打赏
  • 举报
回复
一样的,试过了

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧