Generic indicator factory

2025-07-27 16:41:54 +02:00
parent 791f629a10
commit ecee8b37bc
6 changed files with 827 additions and 274 deletions
@@ -136,15 +136,8 @@ end;

 procedure TDataRecord.CopyFrom<T>(const Src: T);
 begin
-    var ctx := TRttiContext.Create;
-    var rttiType := ctx.GetType(TypeInfo(T));
-
    for var i := 0 to High(FLayout.FFields) do
-    begin
-        var P: PByte := @Src;
-        inc(P, FLayout.Fields[i].Offset);
        FLayout.Fields[i].FromType(FBuffer, Src);
-    end;
 end;

 procedure TDataRecord.CopyValue(const SrcRec: TDataRecord; SrcIdx, DstIdx: Integer);