[GriLab]

Доброго времени суток!

Возник вопрос: можно ли в TListBox зафиксировать первый элемент так, чтобы при прокрутке он оставался на месте, а другие элементы прокручивались? Свойства Style равное OwnerDrawVariable или OwnerDrawFixed.

Заранее спасибо. С уважением, Grilab.

[NIch]

А, что ты хочешь реализовать? Может, есть смысл использовать другой компонент или сгрупировать несколько?

[GriLab]

Я так думаю, что не понятно объяснил, ну ладно. Есть TListBox (свойство Style равное OwnerDrawVariable). Во время выполнения программы первый элемент в списке должен быть всегда поверх остальных, т.е. всегда отображаться, не зависимо от положения вертикального ползунка, как будто нижняя граница первого элемента и есть верхняя граница самого контрола, в данном случаи TListBox'а.

[angvelem]

Ну поставил OwnerDrawXXX, теперь ручками и отрисовывай.

[GriLab]

Отрисовать элемент - не проблема. Проблема, чтобы первый элемент никуда с места не сдвигался (элемент с индексом 0).

[angvelem]

Проблем ты похоже огребёшь по полной. При перерисовке индексы передаются системой и нулевой индекс может уйти за пределы видимости, а если его принудительно выводить, тут начинаются траблы с остальными индексами. Используй что-либо другое, специально под это заточенное.

[GriLab]

angvelem, спасибо за ответ. Вариантов более простых нет. Тему закрываем.

[AlexSku]

Можно попробовать TStringGrid с одной колонкой. Первый ряд сделать фиксированным, это будет заголовок.
Второй вариант - для заголовка использовать THeaderControl (из help'а: For example, header sections could be placed over a list box (TListBox).).