| Class TDBEditN (unit EditNew) |
TDBEdit
| Constructors |
constructor Create(AOwner : TComponent);| Functions |
procedure DOEnter;
procedure DOExit ;
procedure KeyPress(var Key: Char);| Properties |
property ColorOnFocus : TColor
property ColorOnNotFocus : TColor
property EditKeyByTab : Char
property FirstCharUpList : String
property FirstCharUpper : Boolean
property FontColorOnFocus : TColor
property FontColorOnNotFocus : TColor
property WidthOnFocus : Integer| Events |
event OnEnter : TNotifyEvent
event OnExit : TNotifyEvent| Variables |
E_Color : TColor;
FE_Color : TColor;
FI_Color : TColor;
FKeyTab : Char;
FOnEnter : TNotifyEvent;
FOnExit : TNotifyEvent;
FUpper : Boolean;
FUpperList : String;
FWidthOnFocus : Integer;
iWidth : Integer;
I_Color : TColor;| Constructors |
constructor Create(AOwner : TComponent);*************************************************************************}
| Functions |
procedure DOEnter;Capital letter - Mażusculas
procedure DOExit ;To assign the Color upon receiving the focus
procedure KeyPress(var Key: Char);Public declarations
| Properties |
property ColorOnFocus : TColor
property ColorOnNotFocus : TColor
property EditKeyByTab : Char
property FirstCharUpList : String
property FirstCharUpper : Boolean
property FontColorOnFocus : TColor
property FontColorOnNotFocus : TColor
property WidthOnFocus : Integer| Events |
event OnEnter : TNotifyEventPublished declarations
event OnExit : TNotifyEvent| Variables |
E_Color : TColor;
FE_Color : TColor;
FI_Color : TColor;
FKeyTab : Char;
FOnEnter : TNotifyEvent;Private declarations
FOnExit : TNotifyEvent;
FUpper : Boolean;
FUpperList : String;
FWidthOnFocus : Integer;
iWidth : Integer;
I_Color : TColor;