Changeset 344 for trunk/Nation.pas

Timestamp:

Dec 23, 2024, 8:16:05 AM (10 hours ago)

Author:

chronos

Message:

• Modified: Improved implementation of TItemList class to be generic class to avoid explicit typecasting.

File:

• trunk/Nation.pas (modified) (2 diffs)

trunk/Nation.pas

@@ -21 +21 @@
   { TNations }
 
-  TNations = class(TItemList)
-    class function GetItemClass: TItemClass; override;
+  TNations = class(TItemList<TNation>)
   end;
 
@@ -67 +66 @@
 end;
 
-{ TNations }
-
-class function TNations.GetItemClass: TItemClass;
-begin
-  Result := TNation;
-end;
-
 end.