yanyyx

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2009年12月25日

摘要: procedure TFrameDBGridEh.DBGridEh1KeyPress(Sender: TObject; var Key: Char);begin if Key = #13 then begin { 数据校验部分 } if Assigned(funcVerifyData) then funcVerifyData; { 判断是否是最后一列,并自动转到下一行第一列 } if TDBGri... 阅读全文
posted @ 2009-12-25 09:58 Yanyyx 阅读(1459) 评论(0) 推荐(0) 编辑