Source position: mclasses.pas line 369
type TCreateComponentEvent = procedure(
Reader: treader;
ComponentClass: TComponentClass;
var Component: tcomponent
) of object;