Source position: treegrids.pas line 2090
type TTGBackgroundPaintEvent = procedure(
Sender: TBaseTreeGrid;
TargetCanvas: TCanvas;
const R: TRect;
var Handled: Boolean
) of object;