Как выделить другим цветом некоторые элементы в списке TListBox?

← →
dfgdfgh (2004-10-25 16:46) [0]

Как выделить другим цветом некоторые элементы в списке TListBox?
Помогите пожалуйста

← →
begin...end © (2004-10-25 16:48) [1]

TListBox.OnDrawItem ?

отрисовать их через
DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);

procedure TFormConf.List_planDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
var strtemp:string;
begin
With ( Control As tListBox ).Canvas Do Begin
FillRect(Rect);
// тут по условию переопределяешь параметры шрифта и тд
TextOut(Rect.Left, Rect.Top, Control As TListBox ).Items[index] );
End;
end;

Как выделить другим цветом некоторые элементы в списке TListBox? Найти похожие ветки