* Use sender when notifying observers

git-svn-id: trunk@23079 -

rtl/objpas/classes/persist.inc

@@ -99,7 +99,7 @@ begin
       begin
       O:=TObject(FObservers[i]);
       If O.GetInterface(SGUIDObserver,Obs) then
-        Obs.FPOObservedChanged(Self,AOperation,Data);
+        Obs.FPOObservedChanged(ASender,AOperation,Data);
       end;
 end;