TLabel

← →
snake1977 (2003-10-21 11:48) [0]

Здравствуйте! подскажите как можно определить высоту объекта TLabel, чтобы на экране отобразилась вся строка, при установленном WordWrap в true, и AutoSize в false.
Например
Var t:Tlabel;
Begin
t:=TLabel.Create(Panel1);
...
t.AutoSize:=False;
t.WordWrap:=true;
t.Caption:="ля-ля-ля";
t.Width:=30;
t.Height:= // ?????

← →
ZEE (2003-10-21 12:40) [1]

варианты:
1) все-таки вкл. AutoSize + alTop/alBottom
2) сделать свою процедурку расчета высоты (ну вероятно набдо будет разбивать на несколько строк...)
3) не использовать TLabel а рисовать текст самому TextRect(...)

← →
Zergling (2003-10-21 13:01) [2]

Такое TMemo подобные умеют. Возми мемо и свойство BorderStyle := bsNone. Если пороешся в статьях или в FAQ, то может найдеш, как сделать мемо прозрачным (где то я это видел, либо вопрос тут такой задавался). Будет почти TLabel, только ресурсов съест побольше.

← →
KSergey (2003-10-21 13:20) [3]

А чем продиктовано условие "AutoSize в false"?

← →
snake1977 (2003-10-21 17:12) [4]

спасибо за советы, но сдкла сам :)
вот код, может кому пригодится ;)

Var c:TImage;
//почему то на все остальные компоненты ,угается что на
//конвасе рисовать незя :((

Begin
c:=TImage.Create;
xVid:=40; //ширина
yVid:=(((c.Canvas.TextWidth("Любой текст который вздумается") div xDiv)+1)*c.Canvas.TextHeight("C"));
...

← →
Семен Сорокин (2003-10-21 17:48) [5]

snake1977 (21.10.03 17:12) [4]
а как насчет такого текста:
"Любой_текст_который_вздумается"?

TLabel Найти похожие ветки