求一个数字输入控件,控制只能输入整数或实数
解决方案 »
- 找一个四川地区的delphi程序员 机会难得
- 菜鸟提问:关于idhttp部分网站无法得到全部的html代码
- 一个难题!关于ocx中多线程的问题!
- webbrowser中的FORM按回车键不能提交
- '-'变成10000个'-',没有分,祝好心相助的朋友,身体健康
- 关于不缓存到临时文件夹的验证码图片的保存
- 怎么把象素转成和字符串长度相同的长度?
- 怎么能把自己定义的*.Pas文件加入到Delphi的New Items中,以便以后能够直接选择它建立一个新的应用。
- 如何做到程序运行条件不满足是立即退出?
- 请教打印问题:TOleContainer加载Word文件后,如何调用打印?
- 如何在Windows平台下获取针式打印机是否完成了打印任务?
- 股市程序怎么做?
限制一下就可以了
if not( key in ['0'..'9',#13,#8] )then
begin
key := #0;
showmessage('Only numeric allowed here!');
end;////整数 if not( key in ['0'..'9',#13,'.',#8] )then
begin
key := #0;
showmessage('Only numeric and . allowed here!');
end;//整数 实数
直接用EDIT就可以实现
自己是完全可以实现的
要找的话 RAIZE控件的RAIZE EDIT的 RzNumericEdit可以满足你的要求
选择其属性"IntegersOnly"为false表示可以输入整型&浮点型 否则只能整型