source: branches/ByteArray/Forms/FormSourceEditor.lfm

object FormSourceEditor: TFormSourceEditor
  Left = 817
  Height = 681
  Top = 379
  Width = 926
  Caption = 'Source editor'
  ClientHeight = 647
  ClientWidth = 926
  DesignTimePPI = 144
  Menu = MainMenu1
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  LCLVersion = '2.2.6.0'
  object PanelCenter: TPanel
    Left = 0
    Height = 479
    Top = 0
    Width = 926
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
  end
  object Splitter1: TSplitter
    Cursor = crVSplit
    Left = 0
    Height = 8
    Top = 479
    Width = 926
    Align = alBottom
    ResizeAnchor = akBottom
  end
  object PanelBottom: TPanel
    Left = 0
    Height = 160
    Top = 487
    Width = 926
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 2
  end
  object MainMenu1: TMainMenu
    Left = 472
    Top = 144
    object MenuItem1: TMenuItem
      Caption = 'File'
      object MenuItem2: TMenuItem
        Action = ANew
      end
      object MenuItem3: TMenuItem
        Action = AOpen
      end
      object MenuItem4: TMenuItem
        Action = AOpenRecent
      end
      object MenuItem5: TMenuItem
        Action = ASave
      end
      object MenuItem6: TMenuItem
        Action = ASaveAs
      end
      object MenuItem7: TMenuItem
        Action = AClose
      end
      object Separator1: TMenuItem
        Caption = '-'
      end
      object MenuItem8: TMenuItem
        Action = Core.AExit
      end
    end
    object MenuItem20: TMenuItem
      Caption = 'View'
      object MenuItem21: TMenuItem
        Action = Core.AScreen
      end
      object MenuItem22: TMenuItem
        Action = Core.AConsole
      end
      object MenuItem24: TMenuItem
        Action = Core.AStorage
      end
      object MenuItem23: TMenuItem
        Action = Core.AMemory
      end
      object Separator3: TMenuItem
        Caption = '-'
      end
      object MenuItem28: TMenuItem
        Action = Core.AFullscreen
      end
    end
    object MenuItem9: TMenuItem
      Caption = 'Run'
      object MenuItem11: TMenuItem
        Action = ACompile
      end
      object MenuItem10: TMenuItem
        Action = ARun
      end
      object MenuItem12: TMenuItem
        Action = APause
      end
      object MenuItem17: TMenuItem
        Action = AStop
      end
      object MenuItem13: TMenuItem
        Action = AStepIn
      end
      object MenuItem14: TMenuItem
        Action = AStepOver
      end
      object MenuItem15: TMenuItem
        Action = AStepOut
      end
      object MenuItem16: TMenuItem
        Action = ARunToCursor
      end
    end
    object MenuItem25: TMenuItem
      Caption = 'Tools'
      object MenuItem27: TMenuItem
        Action = Core.ASettings
      end
      object Separator2: TMenuItem
        Caption = '-'
      end
      object MenuItem26: TMenuItem
        Action = Core.ADebugger
      end
      object MenuItem29: TMenuItem
        Action = Core.ADisassembler
      end
    end
    object MenuItem18: TMenuItem
      Caption = 'Help'
      object MenuItem19: TMenuItem
        Action = Core.AAbout
      end
    end
  end
  object ActionList1: TActionList
    Left = 618
    Top = 147
    object AExit: TAction
      Caption = 'Exit'
    end
    object ANew: TAction
      Caption = 'New'
      OnExecute = ANewExecute
    end
    object AOpen: TAction
      Caption = 'Open'
      OnExecute = AOpenExecute
      ShortCut = 16463
    end
    object AOpenRecent: TAction
      Caption = 'Open recent'
    end
    object ASave: TAction
      Caption = 'Save'
      OnExecute = ASaveExecute
      ShortCut = 16467
    end
    object ASaveAs: TAction
      Caption = 'Save as...'
      OnExecute = ASaveAsExecute
    end
    object AClose: TAction
      Caption = 'Close'
      OnExecute = ACloseExecute
    end
    object ARun: TAction
      Caption = 'Run'
      OnExecute = ARunExecute
      ShortCut = 120
    end
    object ACompile: TAction
      Caption = 'Compile'
      OnExecute = ACompileExecute
      ShortCut = 16504
    end
    object ARunToCursor: TAction
      Caption = 'Run to cursor'
      ShortCut = 115
    end
    object AStepIn: TAction
      Caption = 'Step in'
      ShortCut = 118
    end
    object AStepOut: TAction
      Caption = 'Step out'
      ShortCut = 8311
    end
    object AStepOver: TAction
      Caption = 'Step over'
      ShortCut = 119
    end
    object APause: TAction
      Caption = 'Pause'
    end
    object AStop: TAction
      Caption = 'Stop'
      OnExecute = AStopExecute
      ShortCut = 16497
    end
  end
end