Replaced Count-Node by RTL-Function

2026-01-13 23:17:32 +01:00
parent 1258f79347
commit 2cc5e53394
17 changed files with 27 additions and 213 deletions
@@ -55,9 +55,6 @@ type
        function GetHashCode: Integer;
    end;

-    IGenericRecordDefinition = IKeywordMapping<IStaticType>;
-    TGenericRecordRegistry = TKeywordMappingRegistry<IStaticType>;
-
    IScalarRecordDefinition = Myc.Data.Scalar.IScalarRecordDefinition;

    // Base Interface
@@ -137,6 +134,9 @@ type
        property Definition: IScalarRecordDefinition read GetDefinition;
    end;

+    IGenericRecordDefinition = IKeywordMapping<IStaticType>;
+    TGenericRecordRegistry = TKeywordMappingRegistry<IStaticType>;
+
    IGenericRecordType = interface(IStaticType)
        {$region 'private'}
        function GetGenericDefinition: IGenericRecordDefinition;