Помощь - Поиск - Пользователи - Календарь
Полная версия: Выделение элементов Listbox цветом
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
Jaxx
18.04.2006 20:46
Короче, есть такая проблема. Пишу программку одну, и застрял на последнем этапе. Есть два Листбокса. В них выводятся старое значение CRC и новое значение соответственно. Так вот надо, чтобы если CRC изменилось, то вывести его новое значение CRC например, красным цветом. Проблема имеет место быть на последней вкадке, "Контроль файлов, стоящих на учете".
Заодно может, кто еще какие-нить недостатки обнаружит.

PS Прошу удалить предыдущее сообщение, нечаянно послал не то, что надо...Нажмите для просмотра прикрепленного файла
Ozzя
19.04.2006 12:45
В ДРКБ смотрел?

Цитата
Как в ListBox нарисовать Item своим цветом? 
procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;  
Rect: TRect; State: TOwnerDrawState);  
begin  
 With ListBox1 do   
 
  
 begin   
 
  
 If odSelected in State then   
 
   Canvas.Brush.Color:=clTeal { твой цвет }   
 
 else   
 
   Canvas.Brush.Color:=clWindow;   
 
 Canvas.FillRect(Rect);   
 
 Canvas.TextOut(Rect.Left+2,Rect.Top,Items[Index]);   
 
  
 end;   
 
  
end;

Hе забудьте установить свойство Style у своего ListBox в lbOwnerDrawFixed или в
lbOwnerDrawVariable.
Взято из http://forum.sources.ru
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.