只允许Edit里只能输入三位数字怎么写在哪里写? 只允许Edit里只能输入三位数字怎么写在哪里写? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 onkeydown 事件中if length(edit1.text)>3 then key:=0;if not key in [$30..$39] then key:=0; coffee36(咖啡) 的方法比较好,也常用另外,只输入数字可以直接限制如: if not key in [0,1,...9] then key:=0毕竟,这样好懂些。 那用MaskEdit控件不是很好吗? coffee36(咖啡) 和lzg827(小刚)结合起来就OK了 maxlength设为3同时onkeypressif not key in [0,1,...9] then key:=0 将Edit的maxlength设为3就可以了 maxlength设为3同时onkeypressif not key in [0,1,...9] then key:=0 少了回格键#8onkeypressif not key in [0,1,...9,#8] thenkey:=#0 怎样在Intraweb上下载文件??????我改怎么办啊?????????急死我了 如何选择打印机? 【★】请CSDN朋友支持个人网站,支持2007长春冬奥会【★】 怎样知道鼠标移出 某个控件(比如Panel)?? 探讨短信开发的流程 delphi 中的消息传送。。。(100分求解) 怎样在报表中金额中加Y如30.00Y 请问怎么判断TWebBrowser.是否提交成功 dbgrid的使用 SQL Server7 的问题... 请教,peekmessage是个什么样的函数? ASCII值的问题(在线等)
if length(edit1.text)>3 then
key:=0;
if not key in [$30..$39] then
key:=0;
如:
if not key in [0,1,...9] then
key:=0毕竟,这样好懂些。
同时onkeypress
if not key in [0,1,...9] then
key:=0
同时onkeypress
if not key in [0,1,...9] then
key:=0
onkeypressif not key in [0,1,...9,#8] then
key:=#0