Source position: fpobserver.pp line 222
protected procedure TBaseListMediator.CreateSubMediators; virtual;