Source position: kgrids.pas line 850
type TKGridEndSizingEvent = procedure(
Sender: TObject;
Index: Integer;
Pos: Integer;
var CanEndSizing: Boolean
) of object;