社区
Delphi
帖子详情
请问如何判断edit里面输入的是数字?
kege
2003-08-18 08:47:06
即可以使用StrToInt(Edit1.text)转换。
另外,我的edit里面初始化了一些文字。我想当鼠标选中它,即准备接受输入的时候,原来的文字就全部变蓝色或删除,这样可以直接输入,而不用一个一个删和用鼠标抹蓝。谢谢了~~~~
...全文
79
7
打赏
收藏
请问如何判断edit里面输入的是数字?
即可以使用StrToInt(Edit1.text)转换。 另外,我的edit里面初始化了一些文字。我想当鼠标选中它,即准备接受输入的时候,原来的文字就全部变蓝色或删除,这样可以直接输入,而不用一个一个删和用鼠标抹蓝。谢谢了~~~~
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
zousoft
2003-08-19
打赏
举报
回复
再有个办法判断是不是数字, 用异常:
try
myNum := StrToInt(Edit1.text);
except
Edit1.Clear;
end;
racesun
2003-08-19
打赏
举报
回复
同意楼上的说法。
ly_liuyang
2003-08-19
打赏
举报
回复
上面都提供了比较好的解决方法了
tankkxx
2003-08-18
打赏
举报
回复
再onclick或者onenter里写上Edit1.SelectAll
PrgmLover
2003-08-18
打赏
举报
回复
用 Edit1.SelectAll 即可让字全部变成蓝色。
如果只允许输入数字 ,可在KeyPress事件里写上
if key not in ['0'..'9']
then abort
kege
2003-08-18
打赏
举报
回复
我想先在里面初始化了一些汉字啊。请高手写几行代码嘛。刚开始学delphi,多多提拔啊!
sixgj
2003-08-18
打赏
举报
回复
呵呵用maskedit好了。设置它的值就可以光输入数字了。
delphi中如何
判断
是不是
数字
如果是
判断
键盘
输入
是否
数字
,可以用上面的算法,很全面了。 如果
判断
文本框或变量中的字符是否为合法
数字
,可以用下面这个方法: var i: LongInt; f: Double; begin if TryStrToInt(
Edit
1.Text,i) or ...
2.Emwin的
数字
键盘
输入
到
Edit
窗口更新以及到另一个页面Text控件的值并且同步改变。
要求如下,
数字
小键盘
输入
数字
后,通过
数字
键盘上的ok键把
输入
值更新到设置界面的
Edit
控件并显示
输入
值。设置界面上有个确定按键,如果不按下确定按键,已经
输入
好的
Edit
的值将不会同步更新到显示界面上的Text控件。...
BCB T
Edit
组件限制
输入
数字
http://hi.baidu.com/jianboth/blog/item/ffe6d004b6d17703728b65a4.html<br /> 方法1: 实现T
Edit
组件的OnKeyPress()事件
里面
: 实现的内容如下: /*限制只能
输入
数字
*/ ...
MFC
判断
文本框
输入
的值是否为
数字
CString str; GetDlgItem(IDC_
EDIT
1)->GetWindowText(str); char c; for(int i=0;i { c = str.GetAt(i); if(c> = '0 '&&c ... else MessageBox( "该
输入
不是
数字
! ", "温馨提示 ",MB_OK); }
edit
中只能
输入
数字
、小数点等等候,还能使用ctrl+c和ctrl+c的办法
procedure TForm1.
Edit
1KeyPress(Sender: TObject; var Key: Char);begin case Key of '0'..'9': ; //对
数字
键响应 #8,#9,#37,#39,#46,#35,#36:; //对退格键、Tab键、左右箭头响应 #1,#3,#22,#24:;//对Ctrl C、...
Delphi
5,927
社区成员
262,932
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章