Source position: TplSmartGridUnit.pas line 67
type TOnCellChanging = procedure(
Sender: TObject;
Col: Integer;
Row: Integer;
var CanChange: Boolean
) of object;