?????
maskedit规定了输入的规则啊?怎么会不正确?
或者 
procedure TForm1.MaskEdit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (key in['0'..'9',#8,#13,'.']) then
    begin
      showmessage('aa');
      maskedit1.Clear;
      key:=#8;
    end;

解决方案 »

  1.   

    输入的规则啊,但是用户可能不遵守啊!
    我要求用户输入4个整数EditMask用:990:990:990:990
    用户可能会有数值没有输入,就会有异常啊!而我也不能用text:=''来判断因为4个数在一个MaskEdit中
      

  2.   

    如果我就用Edit控件,那么又应该如何来处理错误的输入呢?(4个数用“:”分开,可以为0但不能为空。)
      

  3.   

    问题是try后面的程序怎么写,我怎样才能捕捉到这个输入错误而导致的异常?
    MaskEdit虽能控制输入格式,但并不能控制用户输入是否为空啊,当输入为空时我的程序怎么获知?而且不是MaskEdit.text=null,因为4个数在一个MaskEdit中用":"号分开的。注意四个参数均不能为空!有为空,运行程序就会有异常,所以我要屏蔽这个异常。