| Class TFilterAlignEdit (unit GestEdit) |
TEdit
| Constructors |
Constructor Create(AOwner:TComponent);| Functions |
Procedure DoExit;
procedure CMEnter(var Msg: TCMGotFocus);
procedure CreateParams(var Params:TCreateParams);
procedure KeyPress(var Key:Char);
procedure SetAlignment(Value:TAlignment);
Procedure SetRequired(Value:Boolean);
Procedure SetValidCh(Value:TValidChar);
procedure WMPaste(var Message: TWMPaste);| Properties |
property Alignment : TAlignment
property RequiredField : Boolean
property ValidChars : TValidChar| Events |
| Variables |
FRequired : Boolean;
FValidch : TValidChar;
ValidChar : set of char;
FAlignment : TAlignment;| Constructors |
Constructor Create(AOwner:TComponent);| Functions |
Procedure DoExit;Protected declarations
procedure CMEnter(var Msg: TCMGotFocus);
procedure CreateParams(var Params:TCreateParams);like ['A','E','I','O','U']
procedure KeyPress(var Key:Char);BEGIN
procedure SetAlignment(Value:TAlignment);
Procedure SetRequired(Value:Boolean);
Procedure SetValidCh(Value:TValidChar);
procedure WMPaste(var Message: TWMPaste);| Properties |
property Alignment : TAlignment
property RequiredField : Boolean
property ValidChars : TValidCharPublic declarations
| Events |
| Variables |
FRequired : Boolean;For save Alignment*) { Private declarations
FValidch : TValidChar;If Text is required
ValidChar : set of char;String Char
FAlignment : TAlignment;