* Changed ooChanged to ooChange, to be more consistent with tense in other values

git-svn-id: trunk@22262 -

rtl/objpas/classes/classesh.inc

@@ -168,7 +168,7 @@ Const
 Type
   // Notification operations :
   // Observer has changed, is freed, item added to/deleted from list, custom event.
-  TFPObservedOperation = (ooChanged,ooFree,ooAddItem,ooDeleteItem,ooCustom);
+  TFPObservedOperation = (ooChange,ooFree,ooAddItem,ooDeleteItem,ooCustom);
 {$INTERFACES CORBA}
 
   { IFPObserved }

rtl/objpas/classes/collect.inc

@@ -288,7 +288,7 @@ end;
 
 procedure TCollection.Update(Item: TCollectionItem);
 begin
-  FPONotifyObservers(Self,ooChanged,Pointer(Item));
+  FPONotifyObservers(Self,ooChange,Pointer(Item));
 end;
 
 
@@ -419,7 +419,7 @@ procedure TCollection.Exchange(Const Index1, index2: integer);
 
 begin
   FItems.Exchange(Index1,Index2);
-  FPONotifyObservers(Self,ooChanged,Nil);
+  FPONotifyObservers(Self,ooChange,Nil);
 end;
 
 

rtl/objpas/classes/lists.inc

@@ -750,7 +750,7 @@ end;
 procedure TList.Exchange(Index1, Index2: Integer);
 begin
   FList.Exchange(Index1, Index2);
-  FPONotifyObservers(Self,ooChanged,Nil);
+  FPONotifyObservers(Self,ooChange,Nil);
 end;
 
 function TList.Expand: TList;

rtl/objpas/classes/stringl.inc

@@ -551,7 +551,7 @@ end;
 Procedure TStrings.SetUpdateState(Updating: Boolean);
 
 begin
-  FPONotifyObservers(Self,ooChanged,Nil);
+  FPONotifyObservers(Self,ooChange,Nil);
 end;
 
 
@@ -1034,7 +1034,7 @@ begin
    begin
    If Assigned(FOnChange) then
      FOnchange(Self);
-   FPONotifyObservers(Self,ooChanged,Nil);
+   FPONotifyObservers(Self,ooChange,Nil);
    end;
 end;