Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1261264
  • 博文数量: 788
  • 博客积分: 4000
  • 博客等级: 上校
  • 技术积分: 7005
  • 用 户 组: 普通用户
  • 注册时间: 2008-08-19 15:52
文章存档

2017年(81)

2011年(1)

2009年(369)

2008年(337)

分类:

2008-11-27 21:17:38



Delphi   中的Edit输入框如何限定只能输入七位数,,第一位为1到4的数字,第二位到第七位为日期格式取后六位,如:20060123取:060123,任何一位都可以换成"+,-,*"  
   
  如果用正则表达式,应该怎么用?  
   
  当输入格式不对时就提示,如,第一位应输入1到4的数,却按了字母A,则弹出提示

这个可在OnChange事件里面自己判断

还要用到正则表达式吗?

不需要。  
  多找几个字符串函数就行了。  
  你用什么?delphi?

if   length(edit1.text)<=6   then  
      begin  
          if   not   (copy(Edit1.text,0,1)   in   ['1'..'4'])   then  
                begin  
                      application.messageboxs(pchar('fuck   you'),pchar('123'),0);  
                      exit;  
                end;  
              edit1.text:=   edit1.text+copy(formatdatetime(yyyyMMdd,now()),3,length(formatdatetime(yyyyMMdd,now())));  
      end;

DELPHI

给分   给分

我也用到了,是在OnChange事件里判断的

给的这个例子只判断了第一位,后面判断日期的你可以自己参考着写,就是用一些字符串的操作函数。

XX

阅读(497) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~