[Lazarus] Color row in checklistbox

[ugaciaka]

Hi,

I try color a specified row in checklistbox but without effect. I try this

  clbFile.Canvas.Brush.Color:=clRed;
  clbFile.Canvas.FillRect(10,10,50,50);
  clbFile.Canvas.TextOut(10, 10, clbFile.Items[3]);

but not work.

any resolutions?

tnx