Форум: "Начинающим";
Текущий архив: 2006.09.03;
Скачать: [xml.tar.bz2];
ВнизКак в ListBox программно поменять цвет выделенной строчки? Найти похожие ветки
← →
Zilog © (2006-08-15 15:33) [0]Как в ListBox программно поменять цвет выделенной строчки?
← →
Джо © (2006-08-15 15:34) [1]> Zilog © (15.08.06 15:33)
> Как в ListBox программно поменять цвет выделенной строчки?
Использовать OwnerDraw := True и в событии OnDraw самому отрисовывать на канве.
← →
Джо © (2006-08-15 15:36) [2]> OnDraw
OnDrawItem, пардон.
← →
Джо © (2006-08-15 15:37) [3]В таком роде:
procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
with TListBox(Control).Canvas do
begin
if odSelected in State then
begin
Brush.Color := clActiveCaption;
Font.Color := clHighlightText;
end
else
begin
Brush.Color := clWindow;
Font.Color := clWindowText;
end;
ListBox1.Canvas. FillRect (Rect);
TextOut(Rect.Left,Rect.Top,TListBox(Control).Items[Index]);
end;
end;
← →
Zilog © (2006-08-15 15:56) [4]пробовал и так - дело в том, что у меня ListBox1DrawItem не вызывается... ?
← →
Джо © (2006-08-15 15:59) [5]> [4] Zilog © (15.08.06 15:56)
> пробовал и так - дело в том, что у меня ListBox1DrawItem
> не вызывается... ?
Читать [1] внимательно.
← →
Zilog © (2006-08-15 16:16) [6]OwnerDraw - нет там такого
← →
Джо © (2006-08-15 16:18) [7]> [6] Zilog © (15.08.06 16:16)
> OwnerDraw - нет там такого
Зато естьStyle := lbOwnerDrawFixed
:) Сорри, это я по-памяти с TListView перепутал.
← →
clickmaker © (2006-08-15 17:25) [8]
> Zilog © (15.08.06 16:16) [6]
а самому по списку свойств пошариться? Это ж даже со стула вставать не надо...
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.09.03;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.047 c