| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Изменить цвет строки в компоненте TlistView???
Jenya © (2005-12-16 22:49:00)Здравствуйте....
Столкнулся с проблемой в Delphi нужно в компоненте TlistView изменить цвет выделенной одной строки...
т.е. кнопка при нажатии на которой цвет строки менялся на другой.
Типа :
Tlistview1.Font.color:=clred;
Но это команда меняет цвет всех строк... у нужно только выделенной... а в свойстве Tlistview1.selected. там нет параметра изменяющего цвет.
Если кто знает помогите пожалуйста..
Заранее огромно спасибо.
SergGG (2005-12-19 13:24:00) [1]procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Item.Selected = True then
begin
Sender.Selected.Selected:=false; // Будет виден цвет
sender.Canvas.Font.Color := ClRed;
end;
end;
FrykT (2005-12-17 04:39:00) [2]Свойство OwnerDraw поставь в True. Далее тебя ждёт полностью ручная отрисовка на канве. У меня была необходимость такое делать в стиле Репорта. Обрабатывал OnAdvancedDrawItem. Если еще и Данные выводиться будут, то скорее всего событие OnAdvancedCustomDrawItem. Но в любом случае, через канвас придётся выводить.
| |
