急救maskedit(40分)

G

generalzzy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-03

• #1

各位高手:
如何限制maskedit中的日期中月份<13,日期>31,
请将变量和过程都讲一下

 

G

g622

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-03

• #2

不如直接用Tdatetimepicker

 

D

douh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-03

• #3

procedure TForm1.MaskEdit1Exit(Sender: TObject);
var day : TDate;
begin
try
day:=(StrToDate(MaskEdit1.Text));
except
ShowMessage('日期格式不对！');
MaskEdit1.SetFocus;
end;
end;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-03

• #4

多人接受答案了。