TListView - выделить строку жирным цветом

← →
ИМХО © (2003-12-03 06:48) [0]

Как осуществить сабж?
Какое именно событие обрабатывать?
Дайте, пожалуйста, пример.

← →
dDan (2003-12-03 07:53) [1]

А разве жирный цвет бывает
Я может неправильно понял вопрос но копать надо в сторону
CustomDrawItem

← →
ИМХО © (2003-12-03 07:56) [2]

Да, это я зарапортовался :)

Прости надо выделить строку жирным стилем.

← →
Леприкон © (2003-12-03 08:09) [3]

Что то вроде этого, наверное...

procedure TForm1.LVDrawItem(Sender: TCustomListView; Item: TListItem;
Rect: TRect; State: TOwnerDrawState);
var R:TRect;
begin
R:=Item.DisplayRect(drLabel);
if odSelected in State then
with LV.Canvas do
begin
Font.Style:=Font.Style+[fsBold];
Brush.Color:=RGB(130,160,215);
FillRect(Rect);
TextRect(R,R.Left,R.Top,LV.Selected.Caption);
Font.Style:=Font.Style-[fsBold];
end
else
begin
LV.Canvas.FillRect(Rect);
LV.Canvas.TextRect(R,R.Left,R.Top,Item.Caption);
end;

end;

Это для стиля vsReport

← →
dDan (2003-12-03 08:11) [4]

Допустип пусть пример будет такой
if (item.SubItems[2]<=DateToStr(Date)) then begin Sender.Canvas.Brush.Color := clMaroon; Sender.Canvas.Font.Style:=[fsBold]; Sender.Canvas.Font.Color := clSilver;
Если дата во втором сабитеме превышает существуещую дату то строка выделяеться Бордовым а текст Жирный=) и Серебрянный

Спасибо!

TListView - выделить строку жирным цветом Найти похожие ветки