Source position: msegrids.pas line 1968
type gridblockeventty = procedure(
const sender: tcustomgrid;
const aindex: Integer;
const acount: Integer
) of object;