Source position: mseclasses.pas line 164
type setint64indexeventty = procedure(
const sender: tobject;
var avalue: Int64;
var accept: Boolean;
const aindex: Integer
) of object;