判断输入edit中的值是时间用那个函数?

Question

判断输入edit中的值是时间用那个函数?

Answer 1

try
strtodatetime
except
end;
如果异常,说明不是时间..

Answer 2

try
strtodate(Edit1.text)
except
 showmessage(Edit1.text+'不是日期形式!');
end;

Answer 3

参考如下函数：
TryStrToDateTime()
TryStrToDate()
TryStrToTime()//try
procedure TForm1.Button1Click(Sender: TObject);
var
  vDateTime: TDateTime;
begin
  Caption := BoolToStr(TryStrToDate(Edit1.Text, vDateTime), True);
end;

Answer 4

try
strtodatetime
except
end;
如果异常,说明不是时间..

Answer 5

伴水兄的做法我不知道...我还可以接受..
为什么这么说来,,我已经很愤怒了,这年头在csdn里鹦鹉学舌泡分的人实在是太多了,楼主就这么多分,大家还和我抢,要么就像伴水兄一样..拜托不要跟在别人后面学别人怎么说.有意思没啊
怒中......

Answer 6

如果你没有特别的需要，可以使用datetimepicker 控件 啊
同意，但是没有试过，楼上的，赞成你的说服， ！~~~~其实好多时候我这么做不是为了分，而是为了收藏这篇帖子