Lazarus/Delphi кампанент ZCLabel
TZCLabel выводзіць тэкст як і TLabel, але з магчымасцю паварота на адвольны вугал.
Прызначаны для працы ў:
- Lazarus
- Delphi 6, 7, BDS 2005, BDS 2006, 2007, 2009, 2010, XE і XE2
- C++Builder 5, 6 (правяраў толькі на 6-ой)
Асноўныя магчымасці:
- паварот шматрадковага тэксту з улікам выраўноўвання (толькі для TrueType шрыфтоў)
- маляванне тэксту на адвольным палатне
Прыклады кода.
Уваходзіць у камплект да ZColorStringGrid-а.
zcolorstringgrid_bin_0_3.zip (1508Kb) - Зыходны код + прыклады ў exe.
zcolorstringgrid_src_0_3.zip (469Kb) - Зыходны код.
|
|
Скрыншоты
Асноўныя ўласцівасці:
|
Property
|
Кароткае апісанне
|
|
AlignmentVertical: byte
|
Выраўноўванне па вертыкалі:
- 0 - зверху
- 1 - па цэнтры
- 2 - знізу
0 па змаўчанні.
|
|
AlignmentHorizontal: byte
|
Выраўноўванне па гарызанталі:
- 0 - злева
- 1 - па цэнтры
- 2 - справа
0 па змаўчанні.
|
|
AutoSizeHeight: boolean
|
Калі ўсталявана ў True, тое змяняе вышыню кампанента пад памер тэксту. Па змаўчанні False.
|
|
AutoSizeWidth: boolean
|
Калі ўсталявана ў True, тое змяняе шырыню кампанента пад памер тэксту. Па змаўчанні False.
|
|
AutoSizeGrowOnly: boolean
|
Калі ўсталявана ў True, то памеры аўтаматычна могуць толькі павялічвацца. Па змаўчанні False.
|
|
IndentVert: byte
|
Водступ па вертыкалі. Па змаўчанні 0.
|
|
IndentHor: byte
|
Водступ па гарызанталі. Па змаўчанні 3.
|
|
LineSpacing: integer
|
Адлегласць паміж радкамі текста. Па змаўчанні 0.
|
|
Rotate: integer
|
Вугал паварота тэкста. Па змаўчанні 0.
|
|
SymbolWrap: boolean
|
Калі True, то перанос слоў ажыццяўляецца на любым знаку, у адваротным выпадку толькі на прабеле. Па змаўчанні False.
|
|
WordWrap: boolean
|
Калі True, тое пераносіць словы. Па змаўчанні True.
|
Метады:
|
Метад
|
Кароткае апісанне
|
|
procedure DrawTextOn(ACanvas: TCanvas; AText: string; var ARect: TRect; CalcOnly: boolean; ClipArea: boolean = false); overload;
|
Малюе тэкст AText на палатне ACanvas
- ACanvas: TCanvas - палатно для малявання
- AText: string - тэкст
- ARect: TRect - прастакутнік для тэксту
- CalcOnly: boolean - калі true, то толькі вылічвае ARect
- ClipArea: boolean - калі true, тое абразае тэкст, які не змясціўся ў ARect
|
|
procedure DrawTextOn(ACanvas: TCanvas; AText: string; var ARect: TRect; AColor: TColor; CalcOnly: boolean; ClipArea: boolean = false); overload;
|
Малюе тэкст AText колерам AColor на палатне ACanvas
- ACanvas: TCanvas - палатно для малявання
- AText: string - тэкст
- ARect: TRect - прастакутнік для тэксту
- AColor: TColor - колер надпісу
- CalcOnly: boolean - калі true, то толькі вылічвае ARect
- ClipArea: boolean - калі true, тое абразае тэкст, які не змясціўся ў ARect
|
|
