摘要:
procedure TFrameDBGridEh.DBGridEh1KeyPress(Sender: TObject; var Key: Char);begin if Key = #13 then begin { 数据校验部分 } if Assigned(funcVerifyData) then funcVerifyData; { 判断是否是最后一列,并自动转到下一行第一列 } if TDBGri... 阅读全文
摘要:
procedure TFrameDBGridEh.DBGridEh1KeyPress(Sender: TObject; var Key: Char);begin if Key = #13 then begin { 数据校验部分 } if Assigned(funcVerifyData) then funcVerifyData; { 判断是否是最后一列,并自动转到下一行第一列 } if TDBGri... 阅读全文
|