Source position: mclasses.pas line 354
type TSetMethodPropertyEvent = procedure(
Reader: treader;
Instance: tpersistent;
PropInfo: PPropInfo;
const TheMethodName: string;
var Handled: Boolean
) of object;