Source position: TplSunburstChartUnit.pas line 122
type TOnSegmentPaint = procedure(
Sender: TObject;
const aElement: PSunBurstChartElement
) of object;