TWriteable<T>

2025-06-24 19:11:29 +02:00
parent 3797507d95
commit a65a5f2b0a
4 changed files with 140 additions and 48 deletions
@@ -89,15 +89,14 @@ begin
        exit;

    var arr := TDataSeries<TAskBidItem>.CreateArray(3000);
-    var curr := TMutable<TDataSeries<TAskBidItem>>.CreateProtected;
+    var curr := TWriteable<TDataSeries<TAskBidItem>>.CreateProtected;
    var Symbol := FSymbols.WaitFor[SymbolsComboBox.ItemIndex];

    var done :=
-        TAuraFileLoader<TAskBidItem>.LoadData(
-            FServer as TAuraTABFileServer,
+        FServer.ProcessData(
            Symbol,
            FTerminate.Signal,
-            procedure(const Values: TArray<TDataPoint<TAskBidItem>>)
+            procedure(const Values: TArray<TDataPoint<TAskBidItem>>; const Terminated: TState)
            begin
                arr.Add(Values);
                curr.Value := arr.Copy;