如何在DBGRID修改或新增的状态下不让其数据能够移动?因为DBGRID中数据记录移动后默认是POST?

chen_yj 2002-05-06 10:37:42
在DBGRID进行修改或新增的时候!我按鼠标改变其记录条后,数据会默认为保存?我如何在此种情况下不允许用鼠标或键盘改变dbgrid中的记录条的位置?请帮个忙!谢谢!
...全文
181 15 打赏 收藏 举报
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
Bob7946 2002-05-07
  • 打赏
  • 举报
回复
是啊,你这样做的目的是什么?
还不是要保证用户输入数据的完整性
假如你要输入的几个字段里,有几个是非空的,有几个是可空的
那么在非空字段的OnValidate里面来判断一下当前字段的合法性,是空的或是无效的,就abort出来让用户重输,否则如果用户输入的数据是完整有效的,为什么不让人家保存滚动纪录?
而对非空字段,是不是验证是由你自己定的。
chen_yj 2002-05-07
  • 打赏
  • 举报
回复
可记录不需要验证又当如何?更何况如果验证通过,按了鼠标以后还是会保存啊!这与我的想法不同!我的要求是当记录在编辑状态,不能用鼠标进行其它操作!如移动记录等!
chen_yj 2002-05-06
  • 打赏
  • 举报
回复
dbgrid中也没有onscroll事件!!
chen_yj 2002-05-06
  • 打赏
  • 举报
回复
等会儿!好象不能放在此事件中?这样的话,我连保存也不行了啊?!
chen_yj 2002-05-06
  • 打赏
  • 举报
回复
非常感谢!问题得到解决了!还有请问一个另外一个问题,我在dataset事件中看到一些如beforescroll onwillmove等事件?请问能否在这里进行判断!如行,请问如何进行?这些事件的用途如何?能否告之??待会儿我分数一定送上!谢谢
ding_csdn 2002-05-06
  • 打赏
  • 举报
回复
dbgrid中有onscroll事件
Bob7946 2002-05-06
  • 打赏
  • 举报
回复
刚才笔误了,是在datasource的onUpdateData事件里面写代码
例如:
procedure TForm1.DataSource1UpdateData(Sender: TObject);
begin
if Table1.State in [dsEdit,dsInsert] then
begin
showmessage('数据编辑中,请先保存!'); //提示用户
abort;
end;
end;
chen_yj 2002-05-06
  • 打赏
  • 举报
回复
请问如何abort掉啊???还有在datasource的onscroll事件中好象没有onscroll事件啊???
Bob7946 2002-05-06
  • 打赏
  • 举报
回复
有啊,多的是啊,你在DataSource的OnScroll事件里面判断一下,假如dataset.state in [dsinsert,dsedit]的话,就abort掉(当然要多判断一点了)
chen_yj 2002-05-06
  • 打赏
  • 举报
回复
有没有其它的更好的方法???
Bob7946 2002-05-06
  • 打赏
  • 举报
回复
那你可以在数据集的每个需验证的字段对象的OnValidate事件里面写判断,当验证失败后,就abort掉,记录的游标就不会滚动,也就不能post了
chen_yj 2002-05-06
  • 打赏
  • 举报
回复
我的目的是当DBGRID在修改或新增的状态下,不能用鼠标进行对DBGRID的数据移动等操作!如:当在DBGRID中修改时,鼠标点击其它记录时给个提示数据正在修改不能移动!
dreamfan 2002-05-06
  • 打赏
  • 举报
回复
可以改一下locktype属性,让他不自动保存就可以了
Bob7946 2002-05-06
  • 打赏
  • 举报
回复
不过我推荐
"
那你可以在数据集的每个需验证的字段对象的OnValidate事件里面写判断,当验证失败后,就abort掉,记录的游标就不会滚动,也就不能post了
"
这个方法
Bob7946 2002-05-06
  • 打赏
  • 举报
回复
刚才说了,你要多判断一点了
在条件
if Table1.State in [dsEdit,dsInsert] then
里面,你可以加上自己定义的判断条件,比如:
if (Table1.State in [dsEdit,dsInsert]) and Can_Update then
//Can_Update是你定义的一个标志,用来判断是否要进行更新
begin
...
end;

还有,在beforescroll事件里不行,因为post发生在scroll之前
代码下载链接: https://pan.quark.cn/s/90fbf78c3289 "1元云购"是一种依托互联网的购物方式,用户仅需投入微小的资金(一般为一元)便有机会赢取高价值商品。此类模式常借助抽奖机制来判定获胜者,从而吸引众多用户加入。"1元云购源代码"是承载该业务流程的程序代码,其用途在于搭建一个完整的1元云购系统。 在构建1元云购源代码的过程中,主要包含以下几个核心技术要点: 1. **数据库架构**:为了有效存储商品详情、用户资料、交易历史及开奖结果,必须设计科学合理的数据库框架。这包括商品数据表、用户信息表、订单记录表和开奖记录表等,确保数据的统一性与完整性。 2. **支付渠道对接**:1元云购平台需与第三方支付服务(例如支付宝、微信支付)进行对接,以实现用户的在线支付操作。这涉及API接口调用、交易状态同步、退款流程管理等环节。 3. **随机数生成策略**:抽奖过程的核心在于公平透明地选定获奖者,通常采用随机数生成策略来实现。该策略需保障每位参与者拥有相等的获奖机会,同时防止欺诈行为。 4. **用户界面开发**:卓越的用户体验是吸引参与者的关键因素。前端页面应兼具视觉吸引力与操作便捷性,清晰展示商品信息、购买步骤、中奖规范等,并提供用户注册、登录、查询订单等功能。 5. **服务器程序设计**:后端系统负责处理用户请求,如管理订单、计算中奖号码、更新数据库信息等。这部分通常采用PHP等服务器端技术实现,需应对并发访问与高负载情形。 6. **安全措施**:1元云购平台可能面临恶意攻击,例如SQL注入、XSS跨站脚本攻击等。因此,源代码需遵循安全编程准则,对用户输入进行过滤与校验,同时运用HTTPS等加密手段保障数据传输安全。 7. **...

5,944

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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