[razmatazz]

Требуется помощь - поиск в гугле и на форуме ничего не дал.
Каким образом можно для каждого отдельного Item'a в ListBox задать или изменить цвет текста (не фоновый, а обычный)?

[Vasuha]

Можно так...
Свойство Style установите в lbOwnerDrawFixed

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

with  ListBox1.Canvas do begin   if index mod 2 = 0 then begin     Brush.Color:=clGreen;     Font.Color:=clWhite;     FillRect(Rect);     TextOut(Rect.Left+2,Rect.Top+2, ListBox1.Items.Strings[index]); end else     begin         Brush.Color:=clWhite;         Font.Color:=clBlack;         FillRect(Rect);         TextOut(Rect.Left+2,Rect.Top+2, ListBox1.Items.Strings[index]);     end; end;