MycLib/ASTPlayground/MainForm.fmx

object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 883
  ClientWidth = 925
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [Desktop]
  OnCreate = FormCreate
  DesignerMasterStyle = 0
  object Panel1: TPanel
    Align = MostLeft
    Size.Width = 129.000000000000000000
    Size.Height = 883.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 1
    object Test1Button: TButton
      Position.X = 24.000000000000000000
      Position.Y = 32.000000000000000000
      TabOrder = 1
      Text = 'Test 1'
      TextSettings.Trimming = None
      OnClick = Test1ButtonClick
    end
    object Test2Button: TButton
      Position.X = 24.000000000000000000
      Position.Y = 62.000000000000000000
      TabOrder = 2
      Text = 'Test 2'
      TextSettings.Trimming = None
      OnClick = Test2ButtonClick
    end
    object PrettyPrintButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 381.000000000000000000
      TabOrder = 3
      Text = 'Print'
      TextSettings.Trimming = None
      OnClick = PrettyPrintButtonClick
    end
    object DebugButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 411.000000000000000000
      TabOrder = 4
      Text = 'Debug'
      TextSettings.Trimming = None
      OnClick = DebugButtonClick
    end
    object RecursionButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 92.000000000000000000
      Size.Width = 80.000000000000000000
      Size.Height = 22.000000000000000000
      Size.PlatformDefault = False
      TabOrder = 5
      Text = 'Recursion'
      TextSettings.Trimming = None
      OnClick = RecursionButtonClick
    end
    object ShowScopeBox: TCheckBox
      Position.X = 24.000000000000000000
      Position.Y = 441.000000000000000000
      TabOrder = 6
      Text = 'Scope'
    end
    object FibonacciButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 122.000000000000000000
      TabOrder = 8
      Text = 'Fibonacci'
      TextSettings.Trimming = None
      OnClick = FibonacciButtonClick
    end
    object CrerateTriggerExampleButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 168.000000000000000000
      TabOrder = 9
      Text = 'TriggerTest'
      TextSettings.Trimming = None
      OnClick = CrerateTriggerExampleButtonClick
    end
    object DoTriggerButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 198.000000000000000000
      TabOrder = 10
      Text = 'Trigger!'
      TextSettings.Trimming = None
      OnClick = DoTriggerButtonClick
      object DoTrigger2Button: TButton
        Position.Y = 30.000000000000000000
        TabOrder = 5
        Text = 'Trigger2'
        TextSettings.Trimming = None
        OnClick = DoTrigger2ButtonClick
      end
    end
    object ClearButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 472.000000000000000000
      Size.Width = 80.000000000000000000
      Size.Height = 22.000000000000000000
      Size.PlatformDefault = False
      TabOrder = 11
      Text = 'Clear'
      TextSettings.Trimming = None
      OnClick = ClearButtonClick
    end
    object FlowOnlyBox: TCheckBox
      Position.X = 24.000000000000000000
      Position.Y = 8.000000000000000000
      TabOrder = 12
      Text = 'Flow only'
      OnChange = ClearButtonClick
    end
    object SeriesTestButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 274.000000000000000000
      Size.Width = 80.000000000000000000
      Size.Height = 22.000000000000000000
      Size.PlatformDefault = False
      TabOrder = 14
      Text = 'Series'
      TextSettings.Trimming = None
      OnClick = SeriesTestButtonClick
    end
    object OHLCButton: TButton
      Position.X = 24.000000000000000000
      Position.Y = 304.000000000000000000
      TabOrder = 15
      Text = 'OHLC'
      TextSettings.Trimming = None
      OnClick = OHLCButtonClick
    end
    object DebugBox: TCheckBox
      Position.X = 24.000000000000000000
      Position.Y = 360.000000000000000000
      TabOrder = 16
      Text = 'Debug'
    end
  end
  object Panel2: TPanel
    Align = Client
    Size.Width = 796.000000000000000000
    Size.Height = 616.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 3
  end
  object Memo1: TMemo
    Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
    DataDetectorTypes = []
    StyledSettings = [Size, Style, FontColor]
    TextSettings.Font.Family = 'Consolas'
    Align = Bottom
    Position.X = 129.000000000000000000
    Position.Y = 616.000000000000000000
    Size.Width = 796.000000000000000000
    Size.Height = 267.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 2
    Viewport.Width = 792.000000000000000000
    Viewport.Height = 263.000000000000000000
  end
end