Delphi 中的Edit输入框如何限定只能输入七位数,,第一位为1到4的数字,第二位到第七位为日期格式取后六位,如:20060123取:060123,任何一位都 Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiAPI/html/delphi_20061124165258175.html
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