Source position: fpobserver.pp line 87
protected procedure TBaseMediator.CheckPropertyName(
AObject: TObject;
const APropertyName: string
);