you see this code
procedure TFmMain.ListBoxGroupUserDrawItem(Control: TWinControl;
  Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
  ListBoxGroupUser.Canvas.FillRect(rect);
  ImageListView.draw(ListBoxGroupUser.Canvas,rect.Left+2,Rect.top+2,0);
  ListBoxGroupUser.Canvas.TextOut(Rect.Left+ImageListView.Width+2*2,Rect.Top+3,ListBoxGroupUser.Items.Strings[index]);
end;