Delphi - Buttons in ListBox

Status
Not open for further replies.

Kilya

Турист
Доброго времени суток.
Подскажите, кто знает: Возможно ли дорисовать в строке ListBox кнопку, чтоб она была кликабельна, естественно для каждой строки свой код на кнопке?

что то на подобии

или


голову сломал, а результата не нашел.
ХЕЛП
 

LeshaRB

Завсегдатай
Staff member
Moderator
Доброго времени суток.
Подскажите, кто знает: Возможно ли дорисовать в строке ListBox кнопку, чтоб она была кликабельна, естественно для каждой строки свой код на кнопке?

что то на подобии

или


голову сломал, а результата не нашел.
ХЕЛП
Возможно дорисовать
 

alchemist131

Турист
А зачем именно TListBox?
Здесь проще взять за основу TScrollBox и поместить на него панели с автоматическим выравниванием.
Такие панели можно добавлять/удалять динамически, сохраняя указатели на них, например, в TStringList.
Сами панели хороши тем, что на них можно поместить что угодно: надписи, кнопки и т.д.
 

robt

Турист
такое делается через CustomDraw, с ручной отрисовкой как текста так и "кнопок"
состояние "кнопок" типа фокус\нажата\отжата определяется по координатам\кликам мыши в итеме и соответственно перерисовывается
 

protos59

Турист
CustomDraw на мой взгляд тупиковый путь. Я бы посмотрел какие-нибудь готовые grid -ы, позволяющие добавлять кнопки и на их основе реализовал задуманное.
 

moriartee

Турист
Я использовал для этого TScrollBox + фреймы, так ты можешь добавить не только кнопки, ни вообще любое содержимое
 
Status
Not open for further replies.
Top