社区
Delphi
帖子详情
怎样在EDIT框内只能输入数字
moonet
2002-01-23 05:47:29
我想让用户在EDIT框内只能按数字在有显示,按其他的没有反应,请问怎么实现?我不想用spinedit控件,因为旁边的微调按钮碍事,除非能去掉。
...全文
2225
64
打赏
收藏
怎样在EDIT框内只能输入数字
我想让用户在EDIT框内只能按数字在有显示,按其他的没有反应,请问怎么实现?我不想用spinedit控件,因为旁边的微调按钮碍事,除非能去掉。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
64 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
jflbr
2002-01-27
打赏
举报
回复
c/c++
在OnkeyPress事件代码如下:
if((Key<48)&(key>57))
{
if((Key!=8)|(Key!=0x2e))//0x2e为小数点,8为退格键
key=0;
}
jflbr
2002-01-27
打赏
举报
回复
c/c++
在OnkeyPress事件代码如下:
if((Key<48)¦(key>57))
{
if((Key!=8)¦(Key!=0x2e));//0x2e为小数点,8为退格键
key=0;
}
jflbr
2002-01-27
打赏
举报
回复
c/c++
在OnkeyPress事件代码如下:
if((Key<48)|(key>57))
{
if((Key!=8)|(Key!=0x2e))//0x2e为小数点,8为退格键
key=0
}
xyxx
2002-01-27
打赏
举报
回复
if (key<'0') or (key>'9') then
key=#21
zlhyh
2002-01-27
打赏
举报
回复
if not key in [1..9] then
key:=0;
zlhyh
2002-01-27
打赏
举报
回复
if not key in [1..9] then
key:=0;
ttoomm
2002-01-27
打赏
举报
回复
`````````````````````````````````````````````
dy_kiss
2002-01-27
打赏
举报
回复
真的学到不少东西哦
sncel
2002-01-26
打赏
举报
回复
//只輸入數字
SetWindowLong(Edit1.Handle,GWL_STYLE,GetWindowLong(Edit1.Handle, GWL_STYLE) or ES_NUMBER);
hongyou
2002-01-26
打赏
举报
回复
学习~~
eq_iq
2002-01-26
打赏
举报
回复
靠,有必要吗
要maskedit干什么?
hamzsy
2002-01-26
打赏
举报
回复
try
Edit1.Text:=IntToStr(StrToInt(trim(Edit1.Text)));
except
MessageBox(handle,'只能输入数字','警告!',0);
Edit1.Text:='';
end;
phil21
2002-01-26
打赏
举报
回复
已经太多人了,还不结束呀???
delphicat
2002-01-26
打赏
举报
回复
一个很简单的问题
得到的答案让我收益非浅
高~~~~实在是高~~~
NAICKY
2002-01-26
打赏
举报
回复
有谁能介绍一下c#.net下怎么实现吗?
amiao
2002-01-26
打赏
举报
回复
上面已经讲的很清楚了
online
2002-01-26
打赏
举报
回复
写一个ocx吧,很快的,以后自己慢慢用
抱朴守拙
2002-01-25
打赏
举报
回复
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not(Key in ['0'..'9', #8]) then
Key := #0;
end;
xzJohn
2002-01-25
打赏
举报
回复
在edit的onkeypress事件中输入
if not (Key in ['0'..'9','.',#8]) then
Key := #0;
wanb26
2002-01-25
打赏
举报
回复
设置Styles选中Number即可
加载更多回复(44)
delphi 计算周长面积,
edit
框内
只能
输入
数字
以及最多y一个小数点
delphi 计算周长面积,
edit
框内
只能
输入
数字
以及最多y一个小数点
MFC实现
Edit
输入
限制(只允许
输入
数字
,负号和小数点)
MFC实现
Edit
输入
限制(只允许
输入
数字
,负号和小数点) 网上找的,自己又做了一点修改,试过能用
易语言
输入
提示
易语言
输入
提示源码,
输入
提示,词组设置,
输入
辅助_添加,
输入
辅助_内部_弹出,
输入
辅助_内部_按下某键,
输入
辅助_内部_字符
输入
,
输入
辅助_内部_取拼音词组,
输入
辅助_内部_Proc_
Edit
自定义
Edit
类
自定义的一个
Edit
类,限制编辑框
输入
内容。只允许
输入
数字
且第一位不能为0. 内附有使用方法。对初学MFC者有很好的作用。
Edit
Grid(可以编辑的网格控件)
基于MSHFlexGrid扩展而成 提供可以编辑的网格控件 全面兼容MSHFlexGrid的属性和方法 适用于数据库开发中的单据子表
输入
也可做为属性列表框使用 同时还提供了内部使用的3个自定义控件:
数字
输入
控件 带多列下拉列表框的文本控件(可做参照
输入
) 下拉日期控件(可以代码呼出下拉日期) 请从主页 http://progame.vip.myrice.com/ 下载此控件的最新版本!!!!! 示例图请见:http://progame.vip.myrice.com/
edit
grid/ 已帮助手册 打包发布的时候记得带上MSHFlexGrid控件才能在客户端正常使用
Delphi
5,386
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章