Source position: fpobserver.pp line 120
public property TBaseMediator.Subject : TObject read FSubject write SetSubject;