Colorear Texto en una linea de TListBox

[aguml]

buenas, quisiera colorear el texto de la linea que añada en un ListBox y tengo esto:

Código PHP:

ListBoxDebug->Items->Strings[ListBoxDebug->Items->ItemIndex]->Font->Color = clRed; 


La cosa es que eso no cuela y no se como hacerlo y si primero añado la linea y luego la coloreo o primero indico el color y luego la añado o como va eso. No veo la manera por internet.