没有直接判断是否是日期的函数吧!
可以使用 StrToDate 进行转换,成功了就得到日期,不是日期
则捕捉 EConvertError 异常。程序:
try
........;
MyDate:=StrToDate(s);
..........;//利用得到的日期
except
on EConvertError do
begin
...........;//处理不是日期的情况
end;
end;
可以使用 StrToDate 进行转换,成功了就得到日期,不是日期
则捕捉 EConvertError 异常。程序:
try
........;
MyDate:=StrToDate(s);
..........;//利用得到的日期
except
on EConvertError do
begin
...........;//处理不是日期的情况
end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货