d9a82365d3
Bugfix in Chart -> StrokeJoint set to Bevel
223 lines
7.3 KiB
Plaintext
223 lines
7.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'Form1'
|
|
ClientHeight = 840
|
|
ClientWidth = 1017
|
|
FormFactor.Width = 320
|
|
FormFactor.Height = 480
|
|
FormFactor.Devices = [Desktop]
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
DesignerMasterStyle = 0
|
|
object MainPanel: TPanel
|
|
Align = Client
|
|
Size.Width = 1017.000000000000000000
|
|
Size.Height = 712.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 2
|
|
object Splitter1: TSplitter
|
|
Align = Left
|
|
Cursor = crHSplit
|
|
MinSize = 20.000000000000000000
|
|
Position.X = 169.000000000000000000
|
|
Size.Width = 8.000000000000000000
|
|
Size.Height = 712.000000000000000000
|
|
Size.PlatformDefault = False
|
|
end
|
|
object WorkspacePanel: TPanel
|
|
Align = Client
|
|
Size.Width = 840.000000000000000000
|
|
Size.Height = 712.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 3
|
|
object TabControl: TTabControl
|
|
Align = Client
|
|
Size.Width = 840.000000000000000000
|
|
Size.Height = 678.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabIndex = 0
|
|
TabOrder = 10
|
|
TabPosition = PlatformDefault
|
|
end
|
|
object ToolBar: TToolBar
|
|
Size.Width = 840.000000000000000000
|
|
Size.Height = 34.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 3
|
|
object AddWorkspaceButton: TSpeedButton
|
|
Action = AddWorkspaceAction
|
|
Align = FitLeft
|
|
ImageIndex = -1
|
|
Size.Width = 123.636383056640600000
|
|
Size.Height = 34.000000000000000000
|
|
Size.PlatformDefault = False
|
|
Text = 'Add'
|
|
TextSettings.Trimming = None
|
|
end
|
|
object TestButton: TSpeedButton
|
|
Action = TestAction
|
|
Align = FitLeft
|
|
ImageIndex = -1
|
|
Position.X = 123.636383056640600000
|
|
Size.Width = 123.636322021484400000
|
|
Size.Height = 34.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TextSettings.Trimming = None
|
|
object TestPopup: TPopup
|
|
PlacementTarget = TestButton
|
|
Size.Width = 400.000000000000000000
|
|
Size.Height = 400.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 7
|
|
object FlowLayout: TFlowLayout
|
|
Position.X = 224.000000000000000000
|
|
Position.Y = 167.000000000000000000
|
|
TabOrder = 4
|
|
Justify = Left
|
|
JustifyLastLine = Left
|
|
FlowDirection = LeftToRight
|
|
object RandomBox: TCheckBox
|
|
Anchors = [akTop, akRight]
|
|
TabOrder = 1
|
|
Text = 'Random'
|
|
end
|
|
object LoadButton: TButton
|
|
Anchors = [akTop, akRight]
|
|
Position.Y = 19.000000000000000000
|
|
Size.Width = 47.000000000000000000
|
|
Size.Height = 22.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 4
|
|
Text = 'Load'
|
|
TextSettings.Trimming = None
|
|
end
|
|
object RandomButton: TButton
|
|
Anchors = [akTop, akRight]
|
|
Position.Y = 41.000000000000000000
|
|
TabOrder = 2
|
|
Text = 'Random'
|
|
TextSettings.Trimming = None
|
|
end
|
|
object ChartButton: TButton
|
|
Anchors = [akTop, akRight]
|
|
Position.Y = 63.000000000000000000
|
|
TabOrder = 6
|
|
Text = 'ChartButton'
|
|
TextSettings.Trimming = None
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object StrategyButton: TSpeedButton
|
|
Align = FitLeft
|
|
Position.X = 247.272705078125000000
|
|
Size.Width = 123.250000000000000000
|
|
Size.Height = 34.000000000000000000
|
|
Size.PlatformDefault = False
|
|
Text = 'Strategy'
|
|
TextSettings.Trimming = None
|
|
OnClick = StrategyButtonClick
|
|
end
|
|
object SymbolsComboBox: TComboBox
|
|
Align = FitLeft
|
|
Margins.Top = 4.000000000000000000
|
|
Margins.Bottom = 4.000000000000000000
|
|
Position.X = 370.522735595703100000
|
|
Position.Y = 4.000000000000000000
|
|
Size.Width = 141.192199707031300000
|
|
Size.Height = 26.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 3
|
|
end
|
|
object StopButton: TButton
|
|
Align = FitLeft
|
|
Margins.Left = 8.000000000000000000
|
|
Margins.Top = 4.000000000000000000
|
|
Margins.Right = 8.000000000000000000
|
|
Margins.Bottom = 4.000000000000000000
|
|
Position.X = 519.714965820312500000
|
|
Position.Y = 4.000000000000000000
|
|
Size.Width = 111.404327392578100000
|
|
Size.Height = 26.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 7
|
|
Text = 'StopButton'
|
|
TextSettings.Trimming = None
|
|
OnClick = StopButtonClick
|
|
end
|
|
end
|
|
end
|
|
object ObjectsPanel: TPanel
|
|
Align = Left
|
|
Size.Width = 169.000000000000000000
|
|
Size.Height = 712.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 4
|
|
object ObjectsTabControl: TTabControl
|
|
Align = Client
|
|
Size.Width = 169.000000000000000000
|
|
Size.Height = 712.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabIndex = 0
|
|
TabOrder = 0
|
|
TabPosition = Bottom
|
|
Sizes = (
|
|
169s
|
|
686s)
|
|
object ModulesTabItem: TTabItem
|
|
CustomIcon = <
|
|
item
|
|
end>
|
|
TextSettings.Trimming = None
|
|
IsSelected = True
|
|
Size.Width = 66.000000000000000000
|
|
Size.Height = 26.000000000000000000
|
|
Size.PlatformDefault = False
|
|
StyleLookup = ''
|
|
TabOrder = 0
|
|
Text = 'Modules'
|
|
ExplicitSize.cx = 66.000000000000000000
|
|
ExplicitSize.cy = 26.000000000000000000
|
|
object TreeView: TTreeView
|
|
Align = Client
|
|
Size.Width = 169.000000000000000000
|
|
Size.Height = 686.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 0
|
|
OnDblClick = TreeViewDblClick
|
|
AllowDrag = True
|
|
Viewport.Width = 165.000000000000000000
|
|
Viewport.Height = 682.000000000000000000
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object LogMemo: TMemo
|
|
Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
|
|
DataDetectorTypes = []
|
|
Align = Bottom
|
|
Position.Y = 712.000000000000000000
|
|
Size.Width = 1017.000000000000000000
|
|
Size.Height = 128.000000000000000000
|
|
Size.PlatformDefault = False
|
|
TabOrder = 1
|
|
Viewport.Width = 1013.000000000000000000
|
|
Viewport.Height = 124.000000000000000000
|
|
end
|
|
object ActionList: TActionList
|
|
Left = 209
|
|
Top = 32
|
|
object AddWorkspaceAction: TAction
|
|
Text = 'Add Workspace'
|
|
OnExecute = AddWorkspaceActionExecute
|
|
end
|
|
object TestAction: TAction
|
|
Text = 'Test...'
|
|
Checked = True
|
|
OnExecute = TestActionExecute
|
|
end
|
|
end
|
|
end
|