一个难题，请高手帮忙解决!

Question

如果不用MaskEdit呢,就用Edit呢？能做到吗？

Answer 1

请问怎样进行输入检查if not (key in ['0'..'9']) and key in ['.']) then
  begin
    edtyear.Text:='';
    key:=#8;
  end;

Answer 2

补楼上：在KeyPress事件下写代码。
if not (key in ['0'..'9']) and key in ['.']) then
  begin
    edtyear.Text:='';
    key:=#8;
  end;
MaskEdit非常弱智，最好不要用，否则你难于控制。具体会碰到什么问题那要看你们测试人员水平怎么样。