Вычисление высоты текста в TText при WordWrap = true в TLabel Опубликовано 22 июля, 2014 Всем привет. Реализую поведение TListBox, при котором на OnItemClick, высота Item-а увеличивается и становится виден TText (делаем Visible:=true). Анимация для наглядности: ). Реализуется так: Detail := Item.Children.Items[1]; (Detail as TText).Visible := true; ItemAni := TFloatAnimation.Create(Item); ItemAni.Parent := Item; ItemAni.StartValue := 50; ItemAni.StopValue := 150; ItemAni.PropertyName := 'Height'; ItemAni.Start; ItemAni.OnFinish := FreeItemAni; Вопрос такой. Как мне узнать сколько места займет разбитый автоматом на строки текст в TText, чтобы подстраивать высоту Item под размер текста(он получается от 1 до 7-8 строк). Как узнать на сколько подстрок разбивает TText содержимое? Сильно не пинайте, я дизайнер, а не программист. Brovin Yaroslav 1
Вычисление высоты текста в TText при WordWrap = true
в TLabel
Опубликовано
Всем привет.
Реализую поведение TListBox, при котором на OnItemClick, высота Item-а увеличивается и становится виден TText (делаем Visible:=true).
Анимация для наглядности:
).
Реализуется так:
Вопрос такой. Как мне узнать сколько места займет разбитый автоматом на строки текст в TText, чтобы подстраивать высоту Item под размер текста(он получается от 1 до 7-8 строк). Как узнать на сколько подстрок разбивает TText содержимое?
Сильно не пинайте, я дизайнер, а не программист.