Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: MaskEdit gibt Kontrolle nicht her

    Delphi
    by messie, 4. Sep 2007
  Nö, deshalb habe ich es auch nicht verstanden. Es wird ne Exception mit Fehlermeldung ausgelöst, die ich so entsorgen wollte.
  procedure TTntMaskEdit.ValidateEdit;
  var
  Str: WideString;
  Pos: Integer;
  begin
  Str := EditText;
  if IsMasked and Modified then
  begin
  if not ValidateW(Str, Pos) then
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  MaskEdit gibt Kontrolle nicht her

    Delphi
    by messie, 4. Sep 2007
  Moin,
  
  ich habe mir ein eigenes MaskEdit gebastelt (aus dem TntMaskEdit und MaskEditL was hier mal rumschwirrte)
  Nun wollte ich das interne ErrorHandling deaktivieren und habe deshalbprocedure ValidateError; virtual; durchprocedure ValidateError; override; ersetzt:procedure TTntMaskeditL.ValidateError;
  begin
  if fUseErrorHandler then //als property hinzugefügt
  begin
  inherited;
  ...