Class TAlignEdit (unit UAlnEdit)

Inherits from

TEdit

UnitAlignEdit

Constructors


constructor Create(AOwner:TComponent);



Functions

procedure CMEnter(var Msg: TCMGotFocus);


procedure CreateParams(var Params:TCreateParams);


procedure KeyPress(var Key:Char);


procedure SetAlignment(Value:TAlignment);


procedure WMPaste(var Message: TWMPaste);

This code sent to me by Michael Richter mri@ba-glauchau.

Properties

property Alignment : TAlignment


Events

Variables

FAlignment : TAlignment;



Constructors


constructor Create(AOwner:TComponent);


Functions


procedure CMEnter(var Msg: TCMGotFocus);


procedure CreateParams(var Params:TCreateParams);


procedure KeyPress(var Key:Char);


procedure SetAlignment(Value:TAlignment);


procedure WMPaste(var Message: TWMPaste);

This code sent to me by Michael Richter mri@ba-glauchau.de


Properties


property Alignment : TAlignment


Events


Variables


FAlignment : TAlignment;