Calls TToolListItem.Paint and allows to customize item rendering in derived classes.

procedure PaintItem(Item: integer; const R: TRect; State: TToolItemState); virtual;