maskedit1如何处理自己的异常？

type
      inputerr=class(exception);
  .......

  procedure   TForm1.MaskEdit1Exit(Sender:   TObject);//   maskedit   onExit
  begin
      try
        maskedit1.ValidateEdit;//验证输入正确性
      except
          raise   inputerr.create('输入错误');
      end;
  end;
maskedit1如何处理自己的异常？我试着这样做了还是用到系统的错误提示？
用的是分钟的格式 12:00