DataPoint renamed to DataFlow

AuraTrader/AuraTrader.dpr

@@ -5,15 +5,8 @@ uses
     System.StartUpCopy,
     FMX.Forms,
     MainForm in 'MainForm.pas' {Form1},
-    Myc.Aura.Module in '..\Src\Myc.Aura.Module.pas',
-    Myc.Aura.Parameter in '..\Src\Myc.Aura.Parameter.pas',
     TestModule in 'TestModule.pas',
-    DynamicFMXControl in 'DynamicFMXControl.pas',
+    DynamicFMXControl in 'DynamicFMXControl.pas';
-    Myc.Trade.DataArray in '..\Src\Myc.Trade.DataArray.pas',
-    Myc.FMX.Chart.Series in '..\Src\Myc.FMX.Chart.Series.pas',
-    Myc.Trade.Indicators in '..\Src\Myc.Trade.Indicators.pas',
-    Myc.Trade.Types in '..\Src\Myc.Trade.Types.pas',
-    Myc.DataRecord in '..\Src\Myc.DataRecord.pas';
 
 {$R *.res}
 

AuraTrader/AuraTrader.dproj

@@ -135,15 +135,8 @@
         <DCCReference Include="MainForm.pas">
             <Form>Form1</Form>
         </DCCReference>
-        <DCCReference Include="..\Src\Myc.Aura.Module.pas"/>
-        <DCCReference Include="..\Src\Myc.Aura.Parameter.pas"/>
         <DCCReference Include="TestModule.pas"/>
         <DCCReference Include="DynamicFMXControl.pas"/>
-        <DCCReference Include="..\Src\Myc.Trade.DataArray.pas"/>
-        <DCCReference Include="..\Src\Myc.FMX.Chart.Series.pas"/>
-        <DCCReference Include="..\Src\Myc.Trade.Indicators.pas"/>
-        <DCCReference Include="..\Src\Myc.Trade.Types.pas"/>
-        <DCCReference Include="..\Src\Myc.DataRecord.pas"/>
         <BuildConfiguration Include="Base">
             <Key>Base</Key>
         </BuildConfiguration>

AuraTrader/MainForm.pas

@@ -32,14 +32,13 @@ uses
     Myc.Futures,
     Myc.Trade.Types,
     Myc.Trade.DataStream,
-    Myc.Trade.DataPoint,
+    Myc.DataFlow,
     Myc.Signals,
     Myc.Mutable,
     Myc.Trade.DataArray,
     Myc.Signals.FMX,
     Myc.TaskManager,
     Myc.Aura.Module,
-    Myc.Trade.DataPoint.Impl,
     FMX.ListBox,
     FMX.Layouts,
     FMX.TreeView,

AuraTrader/StrategyTest.pas

@@ -5,8 +5,8 @@ interface
 uses
     Myc.Signals,
     Myc.Trade.Types,
-    Myc.Trade.DataPoint,
     Myc.Trade.DataArray,
+    Myc.DataFlow,
     Myc.DataRecord,
     Myc.Trade.Indicators;
 

Src/Myc.Aura.Module.pas

@@ -165,7 +165,6 @@ uses
     Myc.Signals,
     Myc.Futures,
     Myc.Mutable,
-    Myc.Trade.DataPoint,
     Myc.Aura.Parameter;
 
 type

Src/Myc.DataFlow.Impl.pas

@@ -1,4 +1,4 @@
-unit Myc.Trade.DataPoint.Impl;
+unit Myc.DataFlow.Impl;
 
 interface
 
@@ -9,9 +9,9 @@ uses
     Myc.Signals,
     Myc.Mutable,
     Myc.Core.Notifier,
+    Myc.DataFlow,
     Myc.Trade.Types,
-    Myc.Trade.DataArray,
+    Myc.Trade.DataArray;
-    Myc.Trade.DataPoint;
 
 type
     // Abstract base class for data consumers.

Src/Myc.DataFlow.pas

@@ -1,4 +1,4 @@
-unit Myc.Trade.DataPoint;
+unit Myc.DataFlow;
 
 interface
 
@@ -151,7 +151,7 @@ type
 implementation
 
 uses
-    Myc.Trade.DataPoint.Impl;
+    Myc.DataFlow.Impl;
 
 { TProducer<T> }
 

Src/Myc.Fmx.Chart.Series.pas

@@ -10,8 +10,7 @@ uses
     Myc.Mutable,
     Myc.Trade.Types,
     Myc.Trade.DataArray,
-    Myc.Trade.DataPoint,
+    Myc.DataFlow,
-    Myc.Trade.DataPoint.Impl,
     Myc.Fmx.Chart;
 
 type

Src/Myc.Fmx.Chart.pas

@@ -16,9 +16,9 @@ uses
     FMX.Graphics,
     FMX.Forms,
     Myc.Trade.Types,
-    Myc.Trade.DataPoint,
     Myc.Signals,
-    Myc.Mutable;
+    Myc.Mutable,
+    Myc.DataFlow;
 
 type
     TMycChart = class(TStyledControl)

Src/Myc.Trade.DataStream.pas

@@ -12,7 +12,7 @@ uses
     Myc.Signals,
     Myc.Mutable,
     Myc.Trade.Types,
-    Myc.Trade.DataPoint,
+    Myc.DataFlow,
     Myc.Core.FileCache;
 
 type

Src/Myc.Trade.Node.pas

@@ -1,48 +0,0 @@
-unit Myc.Trade.Node;
-
-interface
-
-uses
-    System.SysUtils;
-
-type
-    // Base interface for all objects created by an INode factory.
-    ITradeObject = interface
-        ['{B8A29A67-272E-456A-A816-A19A76E43213}']
-    end;
-
-    // Represents a node in the trading graph, acting as a factory for a trade object.
-    INode = interface
-        ['{E879B5E4-3A4E-434A-8A4F-A9F71B0B7E1C}']
-        function GetCaption: string;
-        // Factory method to create the runtime object.
-        function CreateObject: ITradeObject;
-
-        property Caption: string read GetCaption;
-    end;
-
-    // Abstract base class for all node implementations.
-    TNodeBase = class abstract(TInterfacedObject, INode)
-    protected
-        fCaption: string;
-        function GetCaption: string;
-    public
-        constructor Create(const Caption: string);
-        function CreateObject: ITradeObject; virtual; abstract;
-    end;
-
-implementation
-
-{ TNodeBase }
-
-constructor TNodeBase.Create(const Caption: string);
-begin
-    fCaption := Caption;
-end;
-
-function TNodeBase.GetCaption: string;
-begin
-    result := fCaption;
-end;
-
-end.

Test/MycTests.dpr

@@ -18,17 +18,11 @@ uses
     TestNotifier_Threading in 'TestNotifier_Threading.pas' {/TestNotifier_ChaosStress in 'TestNotifier_ChaosStress.pas',},
     TestNotifier_ChaosStress in 'TestNotifier_ChaosStress.pas',
     TestTasks in 'TestTasks.pas',
-    Myc.Futures in '..\Src\Myc.Futures.pas',
     TestCoreFutures in 'TestCoreFutures.pas',
-    Myc.TaskManager in '..\Src\Myc.TaskManager.pas',
     TestFutures in 'TestFutures.pas',
     Myc.Test.Core.Atomic in '..\Src\Myc.Test.Core.Atomic.pas',
     Myc.Test.Signals.Latch in '..\Src\Myc.Test.Signals.Latch.pas',
     Myc.Test.Signals.Dirty in '..\Src\Myc.Test.Signals.Dirty.pas',
-    Myc.Trade.DataPoint in '..\Src\Myc.Trade.DataPoint.pas',
-    Myc.Trade.Node in '..\Src\Myc.Trade.Node.pas',
-    Myc.Trade.DataStream in '..\Src\Myc.Trade.DataStream.pas',
-    Myc.Mutable in '..\Src\Myc.Mutable.pas',
     Test.Core.Mutable in 'Test.Core.Mutable.pas',
     TestDataRecord in 'TestDataRecord.pas',
     TestDataArray in 'TestDataArray.pas';

Test/MycTests.dproj

@@ -119,17 +119,11 @@ $(PreBuildEvent)]]></PreBuildEvent>
         </DCCReference>
         <DCCReference Include="TestNotifier_ChaosStress.pas"/>
         <DCCReference Include="TestTasks.pas"/>
-        <DCCReference Include="..\Src\Myc.Futures.pas"/>
         <DCCReference Include="TestCoreFutures.pas"/>
-        <DCCReference Include="..\Src\Myc.TaskManager.pas"/>
         <DCCReference Include="TestFutures.pas"/>
         <DCCReference Include="..\Src\Myc.Test.Core.Atomic.pas"/>
         <DCCReference Include="..\Src\Myc.Test.Signals.Latch.pas"/>
         <DCCReference Include="..\Src\Myc.Test.Signals.Dirty.pas"/>
-        <DCCReference Include="..\Src\Myc.Trade.DataPoint.pas"/>
-        <DCCReference Include="..\Src\Myc.Trade.Node.pas"/>
-        <DCCReference Include="..\Src\Myc.Trade.DataStream.pas"/>
-        <DCCReference Include="..\Src\Myc.Mutable.pas"/>
         <DCCReference Include="Test.Core.Mutable.pas"/>
         <DCCReference Include="TestDataRecord.pas"/>
         <DCCReference Include="TestDataArray.pas"/>