Source position: mclasses.pas line 134
type TGetChildProc = procedure(
Child: tcomponent
) of object;