Files
MycLib/AuraTrader/MainForm.fmx
T
Michael Schimmel 9a4f477cfd DataFeed-Producer
2025-12-08 20:25:54 +01:00

245 lines
8.0 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 = 406.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 = 406.000000000000000000
Size.PlatformDefault = False
end
object WorkspacePanel: TPanel
Align = Client
Size.Width = 840.000000000000000000
Size.Height = 406.000000000000000000
Size.PlatformDefault = False
TabOrder = 3
object TabControl: TTabControl
Align = Client
Size.Width = 840.000000000000000000
Size.Height = 372.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'
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
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'
end
object RandomButton: TButton
Anchors = [akTop, akRight]
Position.Y = 41.000000000000000000
TabOrder = 2
Text = 'Random'
end
object ChartButton: TButton
Anchors = [akTop, akRight]
Position.Y = 63.000000000000000000
TabOrder = 6
Text = 'ChartButton'
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'
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'
OnClick = StopButtonClick
end
object Strat2Button: TSpeedButton
Align = FitLeft
Position.X = 639.119262695312500000
Size.Width = 123.636352539062500000
Size.Height = 34.000000000000000000
Size.PlatformDefault = False
Text = 'Strat 2'
OnClick = Strat2ButtonClick
end
end
end
object ObjectsPanel: TPanel
Align = Left
Size.Width = 169.000000000000000000
Size.Height = 406.000000000000000000
Size.PlatformDefault = False
TabOrder = 4
object ObjectsTabControl: TTabControl
Align = Client
Size.Width = 169.000000000000000000
Size.Height = 406.000000000000000000
Size.PlatformDefault = False
TabIndex = 0
TabOrder = 0
TabPosition = Bottom
Sizes = (
169s
380s)
object ModulesTabItem: TTabItem
CustomIcon = <
item
end>
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 = 380.000000000000000000
Size.PlatformDefault = False
TabOrder = 0
OnDblClick = TreeViewDblClick
AllowDrag = True
Viewport.Width = 165.000000000000000000
Viewport.Height = 376.000000000000000000
object Button1: TButton
Position.X = 56.000000000000000000
Position.Y = 72.000000000000000000
TabOrder = 0
Text = 'Button1'
OnClick = Button1Click
end
object Button2: TButton
Position.X = 56.000000000000000000
Position.Y = 112.000000000000000000
TabOrder = 1
Text = 'Button2'
OnClick = Button2Click
end
object Button3: TButton
Position.X = 64.000000000000000000
Position.Y = 152.000000000000000000
TabOrder = 2
Text = 'Button3'
OnClick = Button3Click
end
end
end
end
end
end
object LogMemo: TMemo
Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
DataDetectorTypes = []
Align = Bottom
Position.Y = 406.000000000000000000
Size.Width = 1017.000000000000000000
Size.Height = 434.000000000000000000
Size.PlatformDefault = False
TabOrder = 1
Viewport.Width = 1013.000000000000000000
Viewport.Height = 430.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