Streams refactoring

This commit is contained in:
Michael Schimmel
2026-01-25 02:42:30 +01:00
parent 76c3ad9835
commit 19cdb2f004
+5 -1
View File
@@ -275,11 +275,15 @@ begin
for j := 0 to High(AConfig[i]) do
begin
// Extract the specific column series
FSourceSeries[n] := ASources[i].Series.Fields[AConfig[i][j].Key];
var m := ASources[i].Series.IndexOf(AConfig[i][j].Key);
if m >= 0 then
begin
FSourceSeries[n] := ASources[i].Series[m];
inc(n);
end;
end;
end;
end;
destructor TPipeStream.Destroy;
begin