S
syw
Unregistered / Unconfirmed
GUEST, unregistred user!
我试用两种控件来添加时间,但是每一种都不知如何提前判断。
1、 使用edit,时间格式为(1980-12-29),我想通过字符串函数处理,但是我至今每用过
所以不知怎样用代码实现,请指教?
2、用maskedit调整editmask属性可以限制输入格式,但是它的缺陷是如果输入不对将触发异常,
而我也用异常处理但是还是不行。
代码:begin
tjtable.Open;
tjtable.Insert;
try
tjtable.FieldByName('񅧏').AsString:=tjedit1.Text;
tjtable.FieldByName('ÐÕÃû').AsString:=tjedit2.Text;
tjtable.FieldByName('ÐÔ±ð').AsString:=tjcombobox.Text;
tjtable.FieldByName('Ö°Îñ').AsString:=tjedit4.Text;
tjtable.FieldByName('¹¤×Ê').AsInteger:=strtoint(tjedit5.Text);
tjtable.FieldByName('³öÉúÄêÔÂ').AsDateTime:=strtodate(tjmaskedit.text);
tjtable.FieldByName('µç»°').AsString:=tjedit7.Text;
tjtable.FieldByName('סַ').AsString:=tjedit8.Text;
tjtable.Post;
tjtable.Refresh;
except
begin
showmessage('ÊäÈë¸ñʽ´íÎó£¬Ó¦¸ÃΪ80-12-29£¬±íʾΪ1980Äê12ÔÂ29ÈÕ');
tjtable.ClearFields;
更重要的是我设置的异常处理却不能阻止。
请指教!
由于分数不多,只能给稍微的一点!
顺便问一点,怎样才能得到更多得分,以便我在请教时有分给大家!
1、 使用edit,时间格式为(1980-12-29),我想通过字符串函数处理,但是我至今每用过
所以不知怎样用代码实现,请指教?
2、用maskedit调整editmask属性可以限制输入格式,但是它的缺陷是如果输入不对将触发异常,
而我也用异常处理但是还是不行。
代码:begin
tjtable.Open;
tjtable.Insert;
try
tjtable.FieldByName('񅧏').AsString:=tjedit1.Text;
tjtable.FieldByName('ÐÕÃû').AsString:=tjedit2.Text;
tjtable.FieldByName('ÐÔ±ð').AsString:=tjcombobox.Text;
tjtable.FieldByName('Ö°Îñ').AsString:=tjedit4.Text;
tjtable.FieldByName('¹¤×Ê').AsInteger:=strtoint(tjedit5.Text);
tjtable.FieldByName('³öÉúÄêÔÂ').AsDateTime:=strtodate(tjmaskedit.text);
tjtable.FieldByName('µç»°').AsString:=tjedit7.Text;
tjtable.FieldByName('סַ').AsString:=tjedit8.Text;
tjtable.Post;
tjtable.Refresh;
except
begin
showmessage('ÊäÈë¸ñʽ´íÎó£¬Ó¦¸ÃΪ80-12-29£¬±íʾΪ1980Äê12ÔÂ29ÈÕ');
tjtable.ClearFields;
更重要的是我设置的异常处理却不能阻止。
请指教!
由于分数不多,只能给稍微的一点!
顺便问一点,怎样才能得到更多得分,以便我在请教时有分给大家!