Renaming
This commit is contained in:
@@ -53,7 +53,6 @@ object Form1: TForm1
|
|||||||
Size.Height = 34.000000000000000000
|
Size.Height = 34.000000000000000000
|
||||||
Size.PlatformDefault = False
|
Size.PlatformDefault = False
|
||||||
Text = 'Add'
|
Text = 'Add'
|
||||||
TextSettings.Trimming = None
|
|
||||||
end
|
end
|
||||||
object TestButton: TSpeedButton
|
object TestButton: TSpeedButton
|
||||||
Action = TestAction
|
Action = TestAction
|
||||||
@@ -63,7 +62,6 @@ object Form1: TForm1
|
|||||||
Size.Width = 123.636322021484400000
|
Size.Width = 123.636322021484400000
|
||||||
Size.Height = 34.000000000000000000
|
Size.Height = 34.000000000000000000
|
||||||
Size.PlatformDefault = False
|
Size.PlatformDefault = False
|
||||||
TextSettings.Trimming = None
|
|
||||||
object TestPopup: TPopup
|
object TestPopup: TPopup
|
||||||
PlacementTarget = TestButton
|
PlacementTarget = TestButton
|
||||||
Size.Width = 400.000000000000000000
|
Size.Width = 400.000000000000000000
|
||||||
@@ -90,21 +88,18 @@ object Form1: TForm1
|
|||||||
Size.PlatformDefault = False
|
Size.PlatformDefault = False
|
||||||
TabOrder = 4
|
TabOrder = 4
|
||||||
Text = 'Load'
|
Text = 'Load'
|
||||||
TextSettings.Trimming = None
|
|
||||||
end
|
end
|
||||||
object RandomButton: TButton
|
object RandomButton: TButton
|
||||||
Anchors = [akTop, akRight]
|
Anchors = [akTop, akRight]
|
||||||
Position.Y = 41.000000000000000000
|
Position.Y = 41.000000000000000000
|
||||||
TabOrder = 2
|
TabOrder = 2
|
||||||
Text = 'Random'
|
Text = 'Random'
|
||||||
TextSettings.Trimming = None
|
|
||||||
end
|
end
|
||||||
object ChartButton: TButton
|
object ChartButton: TButton
|
||||||
Anchors = [akTop, akRight]
|
Anchors = [akTop, akRight]
|
||||||
Position.Y = 63.000000000000000000
|
Position.Y = 63.000000000000000000
|
||||||
TabOrder = 6
|
TabOrder = 6
|
||||||
Text = 'ChartButton'
|
Text = 'ChartButton'
|
||||||
TextSettings.Trimming = None
|
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
@@ -116,7 +111,6 @@ object Form1: TForm1
|
|||||||
Size.Height = 34.000000000000000000
|
Size.Height = 34.000000000000000000
|
||||||
Size.PlatformDefault = False
|
Size.PlatformDefault = False
|
||||||
Text = 'Strategy'
|
Text = 'Strategy'
|
||||||
TextSettings.Trimming = None
|
|
||||||
OnClick = StrategyButtonClick
|
OnClick = StrategyButtonClick
|
||||||
end
|
end
|
||||||
object SymbolsComboBox: TComboBox
|
object SymbolsComboBox: TComboBox
|
||||||
@@ -143,7 +137,6 @@ object Form1: TForm1
|
|||||||
Size.PlatformDefault = False
|
Size.PlatformDefault = False
|
||||||
TabOrder = 7
|
TabOrder = 7
|
||||||
Text = 'StopButton'
|
Text = 'StopButton'
|
||||||
TextSettings.Trimming = None
|
|
||||||
OnClick = StopButtonClick
|
OnClick = StopButtonClick
|
||||||
end
|
end
|
||||||
object Strat2Button: TSpeedButton
|
object Strat2Button: TSpeedButton
|
||||||
@@ -153,7 +146,6 @@ object Form1: TForm1
|
|||||||
Size.Height = 34.000000000000000000
|
Size.Height = 34.000000000000000000
|
||||||
Size.PlatformDefault = False
|
Size.PlatformDefault = False
|
||||||
Text = 'Strat 2'
|
Text = 'Strat 2'
|
||||||
TextSettings.Trimming = None
|
|
||||||
OnClick = Strat2ButtonClick
|
OnClick = Strat2ButtonClick
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
@@ -179,7 +171,6 @@ object Form1: TForm1
|
|||||||
CustomIcon = <
|
CustomIcon = <
|
||||||
item
|
item
|
||||||
end>
|
end>
|
||||||
TextSettings.Trimming = None
|
|
||||||
IsSelected = True
|
IsSelected = True
|
||||||
Size.Width = 66.000000000000000000
|
Size.Width = 66.000000000000000000
|
||||||
Size.Height = 26.000000000000000000
|
Size.Height = 26.000000000000000000
|
||||||
@@ -204,7 +195,6 @@ object Form1: TForm1
|
|||||||
Position.Y = 72.000000000000000000
|
Position.Y = 72.000000000000000000
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
Text = 'Button1'
|
Text = 'Button1'
|
||||||
TextSettings.Trimming = None
|
|
||||||
OnClick = Button1Click
|
OnClick = Button1Click
|
||||||
end
|
end
|
||||||
object Button2: TButton
|
object Button2: TButton
|
||||||
@@ -212,7 +202,6 @@ object Form1: TForm1
|
|||||||
Position.Y = 112.000000000000000000
|
Position.Y = 112.000000000000000000
|
||||||
TabOrder = 1
|
TabOrder = 1
|
||||||
Text = 'Button2'
|
Text = 'Button2'
|
||||||
TextSettings.Trimming = None
|
|
||||||
OnClick = Button2Click
|
OnClick = Button2Click
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|||||||
@@ -226,9 +226,9 @@ begin
|
|||||||
|
|
||||||
// Create an instance of the TAuraTABFileServer. The server can be reused for multiple stream creations. [364]
|
// Create an instance of the TAuraTABFileServer. The server can be reused for multiple stream creations. [364]
|
||||||
{$ifdef TICKDATA}
|
{$ifdef TICKDATA}
|
||||||
FServer := TAuraTABFileServer.Create('\\COFFEE\TickData\Pepperstone');
|
FServer := TAskBidFileServer.Create('\\COFFEE\TickData\Pepperstone');
|
||||||
{$else}
|
{$else}
|
||||||
FServer := TAuraM1FileServer.Create('\\COFFEE\TickData\Pepperstone');
|
FServer := TM1FileServer.Create('\\COFFEE\TickData\Pepperstone');
|
||||||
{$endif}
|
{$endif}
|
||||||
|
|
||||||
SymbolsComboBox.Enabled := false;
|
SymbolsComboBox.Enabled := false;
|
||||||
|
|||||||
Reference in New Issue
Block a user