让 Edit 只接受数字《转》

//方法1：
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
beginif not (Key in ['0'..'9']) thenKey := Chr(0);
end;//方法2：
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
beginif not (Byte(Key) in [48..57]) then  // 0的 Ascii 是 48Key := Chr(0);
end;//方法3:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
beginif not CharInSet(Key, ['1'..'5']) then Key := #0;
end;

//Edit 文本的选择与光标位置
procedure TForm1.Button1Click(Sender: TObject);
beginEdit1.SetFocus;                           //给于焦点SendMessage(Edit1.Handle,EM_SETSEL,0,1);  //选择第一个字符SendMessage(Edit1.Handle,EM_SETSEL,0,-1); //全选SendMessage(Edit1.Handle,EM_SETSEL,1,1);  //光标移到第一个字符后面SendMessage(Edit1.Handle,EM_SETSEL,0,0);  //光标移到开始SendMessage(Edit1.Handle,EM_SETSEL,-1,0);  //光标移到开始
end;

转载于:https://www.cnblogs.com/LceMeaning/archive/2013/01/09/2853176.html

让 Edit 只接受数字《转》相关推荐

只接受数字的文本框(翻译)
下载示例源码 - 16.1 Kb 介绍在这个例子中,我将向你介绍怎样扩展一个 ASP.NET textbox ,使之只接受用户输入数字.用户在 textbox 中,除了数字不能输入其它任何数据. 使 ...
C# textbox 屏蔽汉字and英文,只接受数字
有时候我们要用户数字,有时用户不会按照你的要求去做,他们会输入乱七八糟的数据,这样程序出错,也不够严谨,那就我们想办法不让输入其他数据只能输入数字: 在textbox的KeyPress这个事件下写代码 ...
QTextEdit只接受数字输入
QTextEdit只接受数字输入最近楼主在工作中遇到一个需求,需要输入几组数字码,以换行符区分,本想着QTextEdit里面有setValidator方法,直接正则表达式一步搞定,可惜查了半天文档也 ...
20181009_Python练习题-二：自动贩卖机：只接受1元、5元、10元的纸币或硬币，可以1元、5元、10元。最多不超过10块钱。饮料只有橙汁、椰汁、矿泉水、早餐奶，售价分别是3.5、4、2、4
# 题目二:自动贩卖机:只接受1元.5元.10元的纸币或硬币,可以1元.5元.10元.最多不超过10块钱.饮料只有橙汁.椰汁.矿泉水.早餐奶,售价分别是3.5.4.2 # .4.5.写一个函数用来表示 ...
python使用正则表达式删除字符串中的其它字符只保留数字和字母
python使用正则表达式删除字符串中的其它字符只保留数字和字母 #python使用正则表达式删除字符串中的其它字符只保留数字和字母 # Python code to demonstrate # to ...
如何检查一个Python字符串是否只包含数字?
如何检查一个Python字符串是否只包含数字? python String类中有一个名为isdigit()的方法,如果字符串中所有字符都是数字且至少有一个字符,则返回true,否则返回false. p ...
问题解决：SqlParameterCollection只接受非空的SqlParameter类型对象，不接受SqlParameter[]对象
做.net个人版机房收费系统时,遇到了这样一个问题: 既然提到了SqlParameter,那就意味着设置参数处出现了问题,但是到底是哪里出了问题呢,之前运行的时候也没有出错呀,怎么现在又出现了这样的错 ...
aspx 判断字符串是否为decimal_python3之判断字符串是否只为数字！isdigit()、isnumeric()方法...
Isdigit()方法 - 检测字符串是否只由数字组成语法: 1 str.isdigit() 参数: 无返回值: 如果字符串只包含数字,则返回True,否则返回False. 实例: 以下实例展示了 ...
php 任意字符串_php 生成任意长度字符串的类（只含有数字只含有字母混合数字和字母）...
[php]代码库 /* * 生成随机字符串的类,默认只包含数字.大小写字母 */ class randomString { /* * 生成的字符串包含的字符设置 */ const NUMERIC_ON ...
python socket出现ip已经使用_Python：只接受特定的IP（socket）
我有一个由java客户机和python服务器组成的程序.python服务器可以接收多个连接,客户端将尝试每隔17秒连接到服务器. 我的问题: 服务器应该只接受一个用户之前输入的IP的连接.在HOST ...

让 Edit 只接受数字《转》

让 Edit 只接受数字《转》相关推荐

最新文章

热门文章