Source position: treegrids.pas line 2050
type TTGGetHeaderCursorEvent = procedure(
Sender: TTGHeader;
var Cursor: HCURSOR
) of object;