摘要:
delphi中的MaskEdit控件是一个简单的正则验证控件。这里不赘述具体的用法 。正题说下异常的处理。MaskEdit的异常触发是在鼠标离开文本框,聚焦到下个窗口对象时觖的。所以要在每个控件的edtPwMouseEnter,或者KeyDown下处理 异常。代码如下:procedure TQuanXFrm.edtPwMouseEnter(Sender: TObject);begin try edtZhangH.ValidateEdit; except MSGWarning('请按要求输入账号,8位任意字符'); end;end; 阅读全文