Source position: fpobserver.pp line 211
protected procedure TBaseListMediator.SetActive(
const AValue: Boolean
); override;