Listbox Опции

[Артемий]

Тут такой вопрос - как в ListBox изменить цвет выделения текста...никак не найду!

[Артемий]

Вопрос решен!

  With ListBox1 do begin
    if odSelected in State then  begin
 Canvas.Brush.Color := clRed { <--- Òåïåðü öâåò highlighting-à áóäåò êðàñíûì }
end;
    Canvas.FillRect(Rect);
    Canvas.TextOut(Rect.Left+2,Rect.Top,Items[Index]);
  end;

Сообщение отредактировано: Артемий2 - 27.01.2007 18:34