TCustomMaskEdit

type TCustomMaskEdit = class(TCustomEdit)

protected

  class procedure WSRegisterClass; override;

  function ApplyMaskToText();

  function CanShowEmulatedTextHint; override;

  function DisableMask();

  procedure DoValidationError;

  function RestoreMask();

  procedure RealSetText(); override;

  function RealGetText; override;

  function GetTextWithoutMask();

  function GetTextWithoutSpaceChar();

  procedure SetTextApplyMask();

  function GetEditText; virtual;

  procedure SetEditText();

  procedure GetSel();

  procedure SetSel();

  procedure TextChanged; override;

  procedure Change; override;

  procedure SetCharCase(); override;

  procedure SetMaxLength();

  function GetMaxLength;

  procedure SetNumbersOnly(); override;

  procedure Loaded; override;

  procedure LMPasteFromClip(); message;

  procedure LMCutToClip(); message;

  procedure LMClearSel(); message;

  function EditCanModify; virtual;

  procedure Reset; virtual;

  procedure DoEnter; override;

  procedure DoExit; override;

  procedure KeyDown(); override;

  procedure HandleKeyPress();

  procedure KeyPress(); override;

  procedure Utf8KeyPress(); override;

  procedure MouseUp(); override;

  procedure CheckCursor;

  property EditText: string; [rw]

  property IsMasked: Boolean; [r]

  property SpaceChar: char; [rw]

  property MaxLength: Integer; [rw]

  property EditMask: string; [rw]

public

  procedure CutToClipBoard; override;

  procedure PasteFromClipBoard; override;

  constructor Create(); override;

  procedure Clear;

  procedure SelectAll; override;

  procedure ValidateEdit; virtual;

  property EnableSets: Boolean; [rw]

  property ValidationErrorMode: TMaskEditValidationErrorMode; [rw]

  property Modified: Boolean; [rw]

  property OnValidationError: TNotifyEvent; [rw]

end;

TCustomMaskEdit

TCustomEdit

The base class for controls presenting editable text.

TWinControl

Implements a windowed control which can contain other child controls.

TControl

The base class for visible controls.

TLCLComponent

TObject