Edit只输数字
来源:互联网 发布:ubuntu安装emacs25.3 编辑:程序博客网 时间:2024/05/16 10:21
procedure XXXXXX.Edit1KeyPress(Sender: TObject; var Key: Char);
var
m:boolean;
begin
m:=(key<#8)or(key>#8)and(key<#46)or(key>#46)and(key<#48)or(key>#57);
if m then
key:=#0;
end;
procedure Tdkcljl.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if not((key in ['0'..'9',#8]) ) then
key:= #0;
end;
#8为backspace键,#46为小数点,#48~57为数字0~9,#0为空。
- Edit只输数字
- edit框只输入数字
- //让 Edit 只接受数字
- delphi edit 只输入数字 只输入字母
- delphi edit 只输入数字 只输入字母
- Delphi.edit框只允许输入数字&字母
- edit中只能输入数字、小数点(只可以1个小数点)和负号+多个edit共用一个事件
- edit中只能输入数字、小数点(只可以1个小数点)和负号+多个edit共用一个事件
- MFC实现Edit输入限制(只允许输入数字,负号和小数点)
- MFC实现Edit输入限制(只允许输入数字,负号和小数点)
- MFC实现Edit输入限制(只允许输入数字,负号和小数点)
- 只输数字的文本框
- Edit输入数字以及小数
- TextBox只输入数字
- 文本框只接受数字
- TextBox只输入数字
- 只允许数字
- 只允许输入数字
- 站稳马步——(10)java I/O整理1
- 自动编号
- android的log
- 关于iphone程序代理的实现
- java.lang.IllegalArgumentException: Document base D:/appservers/apache-tomcat-6.0.20/webapps/megaeyes_enterprise_manager does no
- Edit只输数字
- ORA-01502
- 日期相关
- Pascal、C/C++、VisualBasic数据类型的对照
- [Linux][2010-11-17]memset函数
- ubuntu 下PDA同步解决(SynCE, OpenSync)
- J2ME客户端中的MVC结构介绍
- 数值转换
- Android 生成apk