Kolor tekstu w TListBox

0

Pytanie proste. Jak zmienić kolor tekstu konkretnej komórki (np 3) w TListBox? ListBox->Font->Color zmienia pewnie wszystkei komórki (ale i tak coś nie chce działać :| ) thx z góry za odpowiedzi [wstyd]

0

heh no i sam znalazłem sobie odpowiedź (może się komuś przyda):

Tworzymy sobie TListBox'a, w Style ustawiamy lbOwnerDrawFixed. W zdarzeniu OnDrawItem:

Jeśli np chcemy żeby 5 pozycja miala text czerwony a tło białe:

[code]if(Index==5)
{
TListBox1->Canvas->Brush->Color = clWindow;
TListBox1->Canvas->Font->Color = clRed;
} else
{
TListBox1->Canvas->Brush->Color = clWindow;
TListBox1->Canvas->Font->Color = clWindowText;
}
TListBox1->Canvas->FillRect(Rect);
TListBox1->Canvas->TextRect(Rect, Rect.Left,Rect.Top, ListBox1->Items->Strings[Index]);
[/code]

1 użytkowników online, w tym zalogowanych: 0, gości: 1