DataStream updated
This commit is contained in:
@@ -337,7 +337,7 @@ begin
|
|||||||
var panel := pnlChart.AddPanel;
|
var panel := pnlChart.AddPanel;
|
||||||
panel.AddDoubleSeries(equity, TAlphaColors.Blue, 3);
|
panel.AddDoubleSeries(equity, TAlphaColors.Blue, 3);
|
||||||
|
|
||||||
FProcessDone := FProcessDone + (FServer as IM1FileServer).ProcessData(Symbol, terminated, ticker.Consumer);
|
FProcessDone := FProcessDone + (FServer as IM1DataServer).ProcessData(Symbol, terminated, ticker.Consumer);
|
||||||
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@@ -599,14 +599,14 @@ begin
|
|||||||
var OhlcPoint := lastPrice.Chain<TDataPoint<TOhlcItem>>(TTradeConverter.CreateTickAggregation(Timeframe));
|
var OhlcPoint := lastPrice.Chain<TDataPoint<TOhlcItem>>(TTradeConverter.CreateTickAggregation(Timeframe));
|
||||||
OhlcPoint.CreateLink(Consumer);
|
OhlcPoint.CreateLink(Consumer);
|
||||||
|
|
||||||
FProcessDone := FProcessDone + (FServer as ITickFileServer).ProcessData(Symbol, terminated, ticker.Consumer);
|
FProcessDone := FProcessDone + (FServer as ITickDataServer).ProcessData(Symbol, terminated, ticker.Consumer);
|
||||||
{$else}
|
{$else}
|
||||||
|
|
||||||
var ticker := TConverter.CreateTicker<TDataPoint<TOhlcItem>>;
|
var ticker := TConverter.CreateTicker<TDataPoint<TOhlcItem>>;
|
||||||
|
|
||||||
ticker.Producer.Chain(Consumer);
|
ticker.Producer.Chain(Consumer);
|
||||||
|
|
||||||
FProcessDone := FProcessDone + (FServer as IM1FileServer).ProcessData(Symbol, terminated, ticker.Consumer);
|
FProcessDone := FProcessDone + (FServer as IM1DataServer).ProcessData(Symbol, terminated, ticker.Consumer);
|
||||||
{$endif}
|
{$endif}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@@ -115,20 +115,20 @@ type
|
|||||||
property Path: String read GetPath;
|
property Path: String read GetPath;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
ITickFileServer = interface(IDataServer<TTickRecord>)
|
ITickDataServer = interface(IDataServer<TTickRecord>)
|
||||||
['{A6DE8B82-B0FB-48DB-A39A-CE91D861C5D2}']
|
['{A6DE8B82-B0FB-48DB-A39A-CE91D861C5D2}']
|
||||||
end;
|
end;
|
||||||
|
|
||||||
TTickFileServer = class(TDataServer<TTickRecord, TTickRecord>, ITickFileServer)
|
TTickFileServer = class(TDataServer<TTickRecord, TTickRecord>, ITickDataServer)
|
||||||
protected
|
protected
|
||||||
function MapRecord(const RecordBuffer: TTickRecord): TDataPoint<TTickRecord>; override;
|
function MapRecord(const RecordBuffer: TTickRecord): TDataPoint<TTickRecord>; override;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
IM1FileServer = interface(IDataServer<TOhlcItem>)
|
IM1DataServer = interface(IDataServer<TOhlcItem>)
|
||||||
['{7BB980D9-1969-49A4-991F-908F2DDAC1A0}']
|
['{7BB980D9-1969-49A4-991F-908F2DDAC1A0}']
|
||||||
end;
|
end;
|
||||||
|
|
||||||
TM1FileServer = class(TDataServer<TOhlcItem, TM1Record>, IM1FileServer)
|
TM1FileServer = class(TDataServer<TOhlcItem, TM1Record>, IM1DataServer)
|
||||||
protected
|
protected
|
||||||
function MapRecord(const RecordBuffer: TM1Record): TDataPoint<TOhlcItem>; override;
|
function MapRecord(const RecordBuffer: TM1Record): TDataPoint<TOhlcItem>; override;
|
||||||
end;
|
end;
|
||||||
|
|||||||
Reference in New Issue
Block a user