一个Edit,一个Button,在Edit中输入一个日期,如何判断是否合法?(80分)

  • 主题发起人 主题发起人 zxin
  • 开始时间 开始时间
Z

zxin

Unregistered / Unconfirmed
GUEST, unregistred user!
一个Edit,一个Button,在Edit中输入一个日期,如何判断是否合法?
要求如下:
1:日期的格式必须是“1998-03-30”
2:充分考虑每个月的天数以及闰年情况,例如2月最多有29天,输入1998-02-30就为不合法
 
Try
StrToData(Edit.text);
except
showmessage('error');
exit;
end;
 
同意 coolinggxyz的方法!
 
1.可以在edit中定义一下格式(‘ - - ’)
2.把edit中的字符取出来:str=edit.text[j]
3.用strtodata(str)判断
 
strToDateTime(Edit.text)发生异常就不合格了吧应该
 
[yellow]谁能帮我写出源代码,我的分统给他![/yellow][:(]
 
都写了这么多,自己组织一下
 
begin
try
StrToDate(Edit1.Text);
except
showmessage('不是合法的日期格式');
exit;
end;
showmessage('是合法的日期');
end;
 
StrToDate(Edit1.Text)就很简单!
 
接受答案了.
 
后退
顶部