| Class TALabel (unit ALabel) |
TLabel
| Constructors |
constructor Create(AOwner : TComponent);----------------------------------------------------------------------
| Functions |
Procedure Paint;----------------------------------------------------------------------
Procedure DrawLabelText(Flags : Word);----------------------------------------------------------------------
Procedure SetAngle(Value : Integer);----------------------------------------------------------------------
| Properties |
property Align : Integer
property Alignment : TAlignment
property Angle : Integer
property Layout : TTextLayout
property WordWrap : Boolean| Events |
| Variables |
FAlign : Integer;
FAlignment : TAlignment;
FAngle : Integer;
FLayout : TTextLayout;
FWordWrap : Boolean;| Constructors |
constructor Create(AOwner : TComponent);Public declarations
----------------------------------------------------------------------
| Functions |
Procedure Paint;Protected declarations
----------------------------------------------------------------------
Procedure DrawLabelText(Flags : Word);Remove from ObjectInspector!} {Internal procedures
----------------------------------------------------------------------
Procedure SetAngle(Value : Integer);Label text
----------------------------------------------------------------------
| Properties |
property Align : IntegerPublished declarations } {Inherited anyway Property Color; Property Font; Property Color; Property Cursor; Property DragCursor; Property DragMode; Property Enabled; Property Hint; Property ParentColor; Property ParentFont; Property Font; Property ShowHint; } {Skip Layout, WordWrap, Align and Alignment from the ObjectInspector by making them read-only
property Alignment : TAlignment
property Angle : IntegerThe new propertie for ALabel!
property Layout : TTextLayout
property WordWrap : Boolean| Events |
| Variables |
FAlign : Integer;Remove from ObjectInspector!} {Strange effects occures when AutoSize = TRUE and Align = alClient! So I removed the Align property
FAlignment : TAlignment;Remove from ObjectInspector!
FAngle : Integer;Private declarations
FLayout : TTextLayout;Add to the OjectInspector!
FWordWrap : Boolean;Remove from ObjectInspector!