Refactoring to new TDataSeries

ChartDisplay/ChartDisplayMain.dfm

@@ -16,14 +16,14 @@ object ChartForm: TChartForm
     900
     835)
   TextHeight = 15
-  object FileSelectButton: TSpeedButton
-    Left = 647
-    Top = 17
+  object PathSelectButton: TSpeedButton
+    Left = 423
+    Top = 18
     Width = 23
-    Height = 22
+    Height = 23
     Anchors = [akTop, akRight]
     Caption = '...'
-    OnClick = FileSelectButtonClick
+    OnClick = PathSelectButtonClick
   end
   object MouseHoverDataLabel: TLabel
     Left = 32
@@ -34,14 +34,14 @@ object ChartForm: TChartForm
     AutoSize = False
     ExplicitTop = 359
   end
-  object FileNameEdit: TEdit
+  object DataPathEdit: TEdit
     Left = 32
     Top = 17
-    Width = 609
+    Width = 385
     Height = 23
     Anchors = [akLeft, akTop, akRight]
     TabOrder = 0
-    Text = '\\COFFEE\TickData\Pepperstone\EURUSD_2017_02.tab_zip'
+    Text = '\\COFFEE\TickData\Pepperstone'
   end
   object LoadButton: TButton
     Left = 686
@@ -116,4 +116,14 @@ object ChartForm: TChartForm
       ExplicitHeight = 97
     end
   end
+  object SymbolComboBox: TComboBox
+    Left = 452
+    Top = 18
+    Width = 228
+    Height = 23
+    Anchors = [akTop, akRight]
+    TabOrder = 7
+    Text = 'GER40'
+    OnChange = SymbolComboBoxChange
+  end
 end