Process.Update for synchronization

Src/Myc.Trade.DataArray.pas

@@ -15,17 +15,19 @@ type
     private
         FChunks: TArray<TChunk>;
         FCount: Int64;
+        FTotalCount: Int64;
 
         function LogicalToPhysicalIndex(LogicalIndex: Int64): Int64; inline;
         function GetItems(Idx: Int64): T; inline;
     public
-        constructor Create(const AChunks: TArray<TChunk>; ACount: Int64);
+        constructor Create(const AChunks: TArray<TChunk>; ACount, ATotalCount: Int64);
         function Add(const Data: T; Lookback: Int64): TMycDataArray<T>; overload;
         function Add(const Data: array of T; First, Count, Lookback: Int64): TMycDataArray<T>; overload;
         class function CreateEmpty: TMycDataArray<T>; static;
         // Helper to create a data array from a raw TArray.
         class function CreateFromArray(const AData: TArray<T>; First, Count: Integer): TMycDataArray<T>; static;
         property Count: Int64 read FCount;
+        property TotalCount: Int64 read FTotalCount;
         property Items[Idx: Int64]: T read GetItems; default;
     end;
 
@@ -33,10 +35,11 @@ implementation
 
 { TMycDataArray<T> }
 
-constructor TMycDataArray<T>.Create(const AChunks: TArray<TChunk>; ACount: Int64);
+constructor TMycDataArray<T>.Create(const AChunks: TArray<TChunk>; ACount, ATotalCount: Int64);
 begin
     FChunks := AChunks;
     FCount := ACount;
+    FTotalCount := ATotalCount;
 end;
 
 class function TMycDataArray<T>.CreateEmpty: TMycDataArray<T>;
@@ -98,7 +101,7 @@ begin
         end;
     end;
 
-    Result := TMycDataArray<T>.Create(newChunks, newCount);
+    Result := TMycDataArray<T>.Create(newChunks, newCount, FTotalCount + Count);
 end;
 
 function TMycDataArray<T>.Add(const Data: T; Lookback: Int64): TMycDataArray<T>;