TTGBeforeCellPaintEvent

type TTGBeforeCellPaintEvent = procedure(

  Sender: TBaseTreeGrid;

  TargetCanvas: TCanvas;

  Node: PTreeGridNode;

  Column: TColumnIndex;

  CellPaintMode: TTGCellPaintMode;

  CellRect: TRect;

  var ContentRect: TRect

) of object;