[Overview][Constants][Types][Classes][Procedures and functions][Index] Reference for unit 'MaskEdit' (#lcl)

TCustomMaskEdit

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

TCustomMaskEdit - base class for TMaskEdit, an Edit box with characters masked out to avoid unauthorised reading

Declaration

Source position: maskedit.pp line 168

type TCustomMaskEdit = class(TCustomEdit) end;

protected

  function ApplyMaskToText();

  function CanShowEmulatedTextHint; override;

  function DisableMask();

  function RestoreMask();

  procedure RealSetText(); override;

  function RealGetText; override;

  function GetTextWithoutMask();

  function GetTextWithoutSpaceChar();

  procedure SetTextApplyMask();

  function GetEditText; virtual;

  

Get the text in the edit box (the string that has been masked)

  procedure SetEditText();

  

SetEditText - specifies the text to appear in the Edit box

  procedure GetSel();

  

GetSel - finds the start and end positions of the selection

  procedure SetSel();

  

SetSel - specifies the start and end positions of the selection

  procedure TextChanged; override;

  

Handles changes of the Text property.

  procedure Change; override;

  procedure SetCharCase();

  function GetCharCase;

  procedure SetMaxLength();

  

  function GetMaxLength;

  

  procedure SetNumbersOnly(); override;

  procedure Loaded; override;

  procedure LMPasteFromClip(); message;

  

LMPasteFromClip - LCL message method for pasting from clipboard

  procedure LMCutToClip(); message;

  

LMCutToClip - LCL message method for cutting to clipboard

  procedure LMClearSel(); message;

  

LMClearSel - LCL message method for clearing selected items

  function EditCanModify; virtual;

  

If True, the Edit box is allowed to modify the contents

  procedure Reset; virtual;

  

Reset - put back to its default state with mask appearing in Text box and no string input

  procedure DoEnter; override;

  

Invokes the OnEnter event handler.

  procedure DoExit; override;

  

Invoke the OnExit event handler.

  procedure KeyDown(); override;

  

Invokes the OnKeyDown handler.

  procedure HandleKeyPress();

  procedure KeyPress(); override;

  

Invokes the OnKeyPress handler.

  procedure Utf8KeyPress(); override;

  procedure MouseUp(); override;

  

Invokes the OnMouseUp handler.

  procedure CheckCursor;

  

  property EditText: string; [rw]

  

The string that has been typed in the Edit Box and obscured by the Masking characters

  property IsMasked: Boolean; [r]

  

isMasked - True if the text is masked

  property SpaceChar: Char; [rw]

  

SpaceChar - the character that is to be used as a Space character

  property MaxLength: Integer; [rw]

  

  property CharCase: TEditCharCase; [rw]

  property EditMask: string; [rw]

  

EditMask - the sequence of characters used to obscure the string being typed (typically a sequence of asterisks)

public

  procedure CutToClipBoard; override;

  

Moves the selected text into the clipboard (removes it from the control).

  procedure PasteFromClipBoard; override;

  

Inserts text from the clipboard at the current position, possibly replacing the selected text.

  constructor Create(); override;

  

  procedure Clear;

  

Deletes all text.

  procedure ValidateEdit; virtual;

  

Validate the string that has been typed in the edit box

  property Modified: Boolean; [rw]

Inheritance

TCustomMaskEdit

  

TCustomMaskEdit - base class for TMaskEdit, an Edit box with characters masked out to avoid unauthorised reading

|

TCustomEdit

  

The base class for controls presenting editable text.

|

TWinControl

  

The base class for controls which can contain other (child) controls.

|

TControl

  

The base class for visible controls.

|

TLCLComponent

  

The base class for LCL components associated with widgets.

|

TComponent

?

TObject

Description

Custom Mask Edit: the base type for Mask Edit

The latest version of this document can be found at lazarus-ccr.sourceforge.net.