Source position: kgrids.pas line 894
type TKGridMovedEvent = procedure(
Sender: TObject;
FromIndex: Integer;
ToIndex: Integer
) of object;