Цитата:
|
Сообщение от Oreon
Добрый день.
Имеется ListBox. Необходимо задать его ширину так, чтоб полностью влезала и была видна самая длинная его строка. Пробовал такой код (выполняется при добавлении строки, s - добавляемая строка):
Код:
ln:=ListBox1.Canvas.TextWidth(s);
if ln>ListBox1.ClientWidth {или просто Width} then
ListBox1.Width:=ln;
не работает, текст все равно не влезает. Помогите решить задачку  |
Если строка очень длинная то текст все равно влезать не будет. попробуй так
Код:
ListBox1.ClientWidth:=ListBox1.Width+Length(ListBox1.Items.Strings[Индекс строки]);