Changeset 138 for trunk/Packages/PersistentData/UPersistentData.pas

Timestamp:

Sep 9, 2022, 8:20:25 PM (21 months ago)

Author:

chronos

Message:

• Modified: Removed TemplateGenerics package. Generics usage replaced by standard Generics.Collections.

File:

• trunk/Packages/PersistentData/UPersistentData.pas (modified) (3 diffs)

trunk/Packages/PersistentData/UPersistentData.pas

@@ -4 +4 @@
 
 uses
-  Classes, SysUtils, UPDClient, SpecializedList;
+  Classes, SysUtils, UPDClient, Generics.Collections;
 
 type
@@ -16 +16 @@
   TPDManager = class(TComponent)
   public
-    Items: TListObject;
+    Items: TObjectList<TPDManagerItem>;
     procedure Register(ClientClass: TPDClientClass);
     procedure LoadToStrings(Strings: TStrings);
@@ -76 +76 @@
 begin
   inherited;
-  Items := TListObject.Create;
+  Items := TObjectList<TPDManagerItem>.Create;
 end;