您的位置:首页 > 编程语言 > Delphi

Delphi中的记录

2020-02-15 01:33 537 查看
1.限制控件只能输入数字及删除键
procedure KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ['0'..'9',#8]) then         //限制只能0-9和删除键有效
Key := #0;
end;
2.DBGrid(Eh)是否在操作某列
if (TControl(Sender).Name = 'myGrid') then
begin
if myGrid.SelectedField.FieldName='SName' then
Testing('在操作SName列');
end;
3.后续接着写
  • 点赞
  • 收藏
  • 分享
  • 文章举报
_lorzl_ 发布了14 篇原创文章 · 获赞 0 · 访问量 1228 私信 关注
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: