S santu Unregistered / Unconfirmed GUEST, unregistred user! 2007-06-29 #1 我在一个Edit中录入时间，我想判断其是否为时间格式，格式如：05:31，如果其不是这种格式提示错误，请问有没有什么好的简单的方法或者函数来判断格式。因为其不挂数据库的字段所以不能用字段的格式设定功能，谢谢各位，劳烦费心了！
我在一个Edit中录入时间，我想判断其是否为时间格式，格式如：05:31，如果其不是这种格式提示错误，请问有没有什么好的简单的方法或者函数来判断格式。因为其不挂数据库的字段所以不能用字段的格式设定功能，谢谢各位，劳烦费心了！
清 清新空气 Unregistered / Unconfirmed GUEST, unregistred user! 2007-06-29 #2 用MaskEdit<br>MaskEdit.EditMask:='00:00:00'即可；
昆 昆明吕顺涛 Unregistered / Unconfirmed GUEST, unregistred user! 2007-06-29 #3 一般的做法都是检测每个字的ASCII码,但好象不行,ORD只认CHAR类型,要不就用集合IN,看看有没有冒号,数字
D dreamisx Unregistered / Unconfirmed GUEST, unregistred user! 2007-06-29 #4 直接用TDateTimePicker,设成时间格式就可以了.
B bbscom Unregistered / Unconfirmed GUEST, unregistred user! 2007-06-30 #5 procedure TForm1.Button1Click(Sender: TObject);<br>var<br> T:TDateTime;<br>begin<br> if Not TryStrToTime(Edit1.Text,T) then<br> ShowMessage(Edit1.Text + ' 不是正确的时间。');<br>end;
procedure TForm1.Button1Click(Sender: TObject);<br>var<br> T:TDateTime;<br>begin<br> if Not TryStrToTime(Edit1.Text,T) then<br> ShowMessage(Edit1.Text + ' 不是正确的时间。');<br>end;
