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