object MainForm: TMainForm Left = 142 Height = 501 Top = 113 Width = 695 Caption = 'Transpascal IDE' ClientHeight = 482 ClientWidth = 695 Font.Height = -11 Font.Name = 'Tahoma' Menu = MainMenu1 OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow Position = poDesktopCenter LCLVersion = '0.9.29' object Splitter3: TSplitter Cursor = crVSplit Left = 0 Height = 5 Top = 477 Width = 695 Align = alBottom ResizeAnchor = akBottom end object DockPanel: TPanel Left = 0 Height = 451 Top = 26 Width = 695 Align = alClient BevelOuter = bvNone TabOrder = 1 end object ToolBar1: TToolBar Left = 0 Height = 26 Top = 0 Width = 695 Caption = 'ToolBar1' TabOrder = 2 object ComboBoxTargetSelection: TComboBox Left = 1 Height = 21 Top = 2 Width = 100 ItemHeight = 13 ItemIndex = 1 Items.Strings = ( 'Pascal' 'C' 'AS8051' 'XML' ) OnChange = ComboBoxTargetSelectionChange Style = csDropDownList TabOrder = 0 Text = 'C' end object Button1: TButton Left = 101 Height = 22 Top = 2 Width = 59 Action = ABuild TabOrder = 1 end end object MainMenu1: TMainMenu left = 624 top = 8 object MenuItem1: TMenuItem Caption = 'Project' object MenuItem5: TMenuItem Action = AProjectNew end object MenuItem2: TMenuItem Action = AProjectOpen end object MenuItemOpenRecent: TMenuItem Caption = 'Open recent' end object MenuItem4: TMenuItem Action = AProjectSave end object MenuItem6: TMenuItem Action = AProjectSaveAs end object MenuItem3: TMenuItem Action = AProjectClose end end object MenuItem7: TMenuItem Caption = 'Run' object MenuItem8: TMenuItem Action = ABuild end end end object ActionList1: TActionList left = 624 top = 64 object AProjectNew: TAction Category = 'Project' Caption = 'New' Hint = 'Create new project' end object AProjectOpen: TAction Category = 'Project' Caption = 'Open...' Hint = 'Open project' OnExecute = AProjectOpenExecute end object AProjectSave: TAction Category = 'Project' Caption = 'Save' Hint = 'Save project to disk' end object AProjectSaveAs: TAction Category = 'Project' Caption = 'Save as...' Hint = 'Save project with custom name' OnExecute = AProjectSaveAsExecute end object AProjectClose: TAction Category = 'Project' Caption = 'Close' end object ABuild: TAction Category = 'Build' Caption = 'Build' OnExecute = ButtonCompileClick end end object CoolDockMaster1: TCoolDockMaster TabsEnabled = True DefaultTabsPos = hpAuto DefaultHeaderPos = hpAuto ShowIcons = False left = 428 top = 56 end object CoolDockClient1: TCoolDockClient Dockable = False Floatable = False Master = CoolDockMaster1 Panel = DockPanel left = 504 top = 56 end object OpenDialog1: TOpenDialog Filter = 'Project file (*.*)|*.tppr|Any file (*.*)|*.*' left = 115 top = 52 end object SaveDialog1: TSaveDialog Filter = 'Project file (*.*)|*.tppr|Any file (*.*)|*.*' left = 115 top = 104 end end