Source position: fpobserver.pp line 208
protected procedure TBaseListMediator.SetSelectedObject(
const AValue: TObject
); virtual;