Czcionka w ListBox

Jak pogrubić czcionkę tylko dla jednego elementu z ListBox'a

np.

aaaaa
bbbbb
cccccc
ddddd

Skorzystaj z OwnerDraw jest przykład na stronce.

Style na:
lbOwnerDrawVariable

W OnDrawItem:

with ListBox1.Canvas do
begin
FillRect(Rect);
if Index=1 then Font.Color := clBlue; //ustawiasz tam której pozycji zmienić kolor
TextOut(Rect.Left, Rect.Top, ListBox1.Items[Index]);
end;