Source position: fpobserver.pp line 100
protected procedure TBaseMediator.FPOObservedChanged(
ASender: TObject;
Operation: TFPObservedOperation;
Data: Pointer
);