Скачать: CL | DM;

Изменить цвет строки в компоненте TlistView???   Найти похожие ветки 

← →
Jenya   (2005-12-16 22:49) [0]

Здравствуйте....
Столкнулся с проблемой в Delphi нужно в компоненте TlistView изменить цвет выделенной одной строки...
т.е. кнопка при нажатии на которой цвет строки менялся на другой.
Типа :
Tlistview1.Font.color:=clred;

Но это команда меняет цвет всех строк... у нужно только выделенной... а в свойстве Tlistview1.selected. там нет параметра изменяющего цвет.

Если кто знает помогите пожалуйста..
Заранее огромно спасибо.

---

← →
FrykT ©   (2005-12-17 04:39) [1]

Свойство OwnerDraw поставь в True. Далее тебя ждёт  полностью ручная отрисовка на канве. У меня была необходимость такое делать в стиле Репорта.  Обрабатывал OnAdvancedDrawItem. Если еще и Данные  выводиться будут, то скорее всего событие OnAdvancedCustomDrawItem. Но в любом случае, через канвас придётся выводить.

---

← →
SergGG ©   (2005-12-19 13:24) [2]

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;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.031 c