Pascal Interface Extract

Src/Myc.Trade.DataStream.pas

@@ -605,13 +605,13 @@ begin
     FCurrPosInFile := 0;
     FCurrentData := FDataServer.LoadDataFile(FCurrentFileName);
     // Forward all future done events, because this means there is new data.
-    FCurrentData.Done.Subscribe( FHasData );
+    FCurrentData.Done.Subscribe(FHasData);
 
     FNextFileName := FDataServer.FindNextDataFile(FCurrentFileName);
     if FNextFileName <> '' then
     begin
         FNextData := FDataServer.LoadDataFile(FNextFileName);
-        FNextData.Done.Subscribe( FHasData );
+        FNextData.Done.Subscribe(FHasData);
     end;
 end;
 
@@ -640,7 +640,7 @@ begin
         if FNextFileName <> '' then
         begin
             FNextData := FDataServer.LoadDataFile(FNextFileName);
-            FNextData.Done.Subscribe( FHasData );
+            FNextData.Done.Subscribe(FHasData);
         end;
 
         if not FCurrentData.Done.IsSet then