![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TListBox - Color select item
LDV © (2009-09-03 17:22:00)Как заменить синий цвет выделения на другой
KilkennyCat (2009-09-03 18:53:00) [1]
> if Selected[Index] then
это что?
когда обработчик новый, неужели не любопытно посмотреть все его свойства и прочитать про
State: TOwnerDrawState
LDV (2009-09-03 18:18:00) [2]а как скидывать color в предудущих select item:
with TListBox(Control), Canvas do
if Selected[Index] then
begin
Brush.Color := clMoneyGreen;
FillRect(Rect);
end
else
begin
Brush.Color := clWhite;
FillRect(Rect);
end;
clickmaker (2009-09-03 17:26:00) [3]OwnerDraw