怎么判断用户输入的日期是否合法? 用户输入年份和月份的字符串,格式为 YYYYMM ,如 200506如果判断用户输入的字符串是否合法呢? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 if TryStrToDate('2005/06/'+'01',s) then showmessage('ok');將你的字串組成日期格式后再轉 try StrTodate('200506'+'01');except on e: Exception do begin showmessage(‘请输入有效的日期’); exit; end;end; //判断指定字符串是否为日期格式的函数function isDate(Const aDateStr:String):Boolean;begin result:=True; try StrToDate(aDateStr);//尝试将字符串转换为日期 except result:=False;//如果出错,则返回False; end;end; delphi 怎么判断一个动态库是否注册! DELPHI中TreeList节点的问题 怎么知道是谁show的form? dxdbtreeview控件的定位和拖动 Windows下文件备份到磁带,是否和访问磁盘一样呢 DBGridEh格式问题? 字符与PChar类型转换问题 Oracle中Insert语句太长就插不进去,请问有什么解决办法? 有关Table与ADOTable组件的setkey方法的请教,小虾请大侠给解决一下 请问那有*.ico图标下载? 有没有关于地址薄相关的组件? 邮件程序,急用,up有分。
將你的字串組成日期格式后再轉
StrTodate('200506'+'01');
except
on e: Exception do
begin
showmessage(‘请输入有效的日期’);
exit;
end;
end;
//判断指定字符串是否为日期格式的函数
function isDate(Const aDateStr:String):Boolean;
begin
result:=True;
try
StrToDate(aDateStr);//尝试将字符串转换为日期
except
result:=False;//如果出错,则返回False;
end;
end;