| 1 | object FormMain: TFormMain
 | 
|---|
| 2 |   Left = 534
 | 
|---|
| 3 |   Height = 993
 | 
|---|
| 4 |   Top = 223
 | 
|---|
| 5 |   Width = 1491
 | 
|---|
| 6 |   Caption = 'Interpreter'
 | 
|---|
| 7 |   ClientHeight = 959
 | 
|---|
| 8 |   ClientWidth = 1491
 | 
|---|
| 9 |   DesignTimePPI = 144
 | 
|---|
| 10 |   Menu = MainMenu1
 | 
|---|
| 11 |   OnActivate = FormActivate
 | 
|---|
| 12 |   OnClose = FormClose
 | 
|---|
| 13 |   OnCreate = FormCreate
 | 
|---|
| 14 |   OnDestroy = FormDestroy
 | 
|---|
| 15 |   OnShow = FormShow
 | 
|---|
| 16 |   LCLVersion = '2.2.6.0'
 | 
|---|
| 17 |   object PanelMessages: TPanel
 | 
|---|
| 18 |     Left = 0
 | 
|---|
| 19 |     Height = 127
 | 
|---|
| 20 |     Top = 832
 | 
|---|
| 21 |     Width = 1491
 | 
|---|
| 22 |     Align = alBottom
 | 
|---|
| 23 |     BevelOuter = bvNone
 | 
|---|
| 24 |     TabOrder = 0
 | 
|---|
| 25 |   end
 | 
|---|
| 26 |   object Splitter1: TSplitter
 | 
|---|
| 27 |     Cursor = crVSplit
 | 
|---|
| 28 |     Left = 0
 | 
|---|
| 29 |     Height = 8
 | 
|---|
| 30 |     Top = 824
 | 
|---|
| 31 |     Width = 1491
 | 
|---|
| 32 |     Align = alBottom
 | 
|---|
| 33 |     ResizeAnchor = akBottom
 | 
|---|
| 34 |   end
 | 
|---|
| 35 |   object Panel1: TPanel
 | 
|---|
| 36 |     Left = 0
 | 
|---|
| 37 |     Height = 824
 | 
|---|
| 38 |     Top = 0
 | 
|---|
| 39 |     Width = 1491
 | 
|---|
| 40 |     Align = alClient
 | 
|---|
| 41 |     ClientHeight = 824
 | 
|---|
| 42 |     ClientWidth = 1491
 | 
|---|
| 43 |     TabOrder = 2
 | 
|---|
| 44 |     object PanelSource: TPanel
 | 
|---|
| 45 |       Left = 1
 | 
|---|
| 46 |       Height = 822
 | 
|---|
| 47 |       Top = 1
 | 
|---|
| 48 |       Width = 826
 | 
|---|
| 49 |       Align = alClient
 | 
|---|
| 50 |       BevelOuter = bvNone
 | 
|---|
| 51 |       TabOrder = 0
 | 
|---|
| 52 |     end
 | 
|---|
| 53 |     object PanelOutput: TPanel
 | 
|---|
| 54 |       Left = 835
 | 
|---|
| 55 |       Height = 822
 | 
|---|
| 56 |       Top = 1
 | 
|---|
| 57 |       Width = 655
 | 
|---|
| 58 |       Align = alRight
 | 
|---|
| 59 |       BevelOuter = bvNone
 | 
|---|
| 60 |       TabOrder = 1
 | 
|---|
| 61 |     end
 | 
|---|
| 62 |     object Splitter2: TSplitter
 | 
|---|
| 63 |       Left = 827
 | 
|---|
| 64 |       Height = 822
 | 
|---|
| 65 |       Top = 1
 | 
|---|
| 66 |       Width = 8
 | 
|---|
| 67 |       Align = alRight
 | 
|---|
| 68 |       ResizeAnchor = akRight
 | 
|---|
| 69 |     end
 | 
|---|
| 70 |   end
 | 
|---|
| 71 |   object MainMenu1: TMainMenu
 | 
|---|
| 72 |     Left = 744
 | 
|---|
| 73 |     Top = 759
 | 
|---|
| 74 |     object MenuItemFile: TMenuItem
 | 
|---|
| 75 |       Caption = 'File'
 | 
|---|
| 76 |       object MenuItem10: TMenuItem
 | 
|---|
| 77 |         Action = AFileOpen
 | 
|---|
| 78 |       end
 | 
|---|
| 79 |       object MenuItem6: TMenuItem
 | 
|---|
| 80 |         Action = AExit
 | 
|---|
| 81 |       end
 | 
|---|
| 82 |     end
 | 
|---|
| 83 |     object MenuItemGenerate: TMenuItem
 | 
|---|
| 84 |       Caption = 'Generate'
 | 
|---|
| 85 |       object MenuItem1: TMenuItem
 | 
|---|
| 86 |         Action = AGeneratePascal
 | 
|---|
| 87 |       end
 | 
|---|
| 88 |       object MenuItem2: TMenuItem
 | 
|---|
| 89 |         Action = AGeneratePhp
 | 
|---|
| 90 |       end
 | 
|---|
| 91 |       object MenuItem3: TMenuItem
 | 
|---|
| 92 |         Action = AGenerateCSharp
 | 
|---|
| 93 |       end
 | 
|---|
| 94 |       object MenuItem7: TMenuItem
 | 
|---|
| 95 |         Action = AGenerateXml
 | 
|---|
| 96 |       end
 | 
|---|
| 97 |     end
 | 
|---|
| 98 |     object MenuItemRun: TMenuItem
 | 
|---|
| 99 |       Caption = 'Run'
 | 
|---|
| 100 |       object MenuItem4: TMenuItem
 | 
|---|
| 101 |         Action = ARun
 | 
|---|
| 102 |       end
 | 
|---|
| 103 |       object MenuItem5: TMenuItem
 | 
|---|
| 104 |         Action = ACompile
 | 
|---|
| 105 |       end
 | 
|---|
| 106 |     end
 | 
|---|
| 107 |     object MenuItem8: TMenuItem
 | 
|---|
| 108 |       Caption = 'Tools'
 | 
|---|
| 109 |       object MenuItem9: TMenuItem
 | 
|---|
| 110 |         Action = ATest
 | 
|---|
| 111 |       end
 | 
|---|
| 112 |     end
 | 
|---|
| 113 |   end
 | 
|---|
| 114 |   object ActionList1: TActionList
 | 
|---|
| 115 |     Left = 901
 | 
|---|
| 116 |     Top = 759
 | 
|---|
| 117 |     object AGeneratePascal: TAction
 | 
|---|
| 118 |       Caption = 'Generate Pascal'
 | 
|---|
| 119 |       OnExecute = AGeneratePascalExecute
 | 
|---|
| 120 |     end
 | 
|---|
| 121 |     object AGeneratePhp: TAction
 | 
|---|
| 122 |       Caption = 'Generate PHP'
 | 
|---|
| 123 |       OnExecute = AGeneratePhpExecute
 | 
|---|
| 124 |     end
 | 
|---|
| 125 |     object AGenerateCSharp: TAction
 | 
|---|
| 126 |       Caption = 'Generate C#'
 | 
|---|
| 127 |       OnExecute = AGenerateCSharpExecute
 | 
|---|
| 128 |     end
 | 
|---|
| 129 |     object ARun: TAction
 | 
|---|
| 130 |       Caption = 'Run'
 | 
|---|
| 131 |       OnExecute = ARunExecute
 | 
|---|
| 132 |       ShortCut = 120
 | 
|---|
| 133 |     end
 | 
|---|
| 134 |     object ACompile: TAction
 | 
|---|
| 135 |       Caption = 'Compile'
 | 
|---|
| 136 |       OnExecute = ACompileExecute
 | 
|---|
| 137 |       ShortCut = 16497
 | 
|---|
| 138 |     end
 | 
|---|
| 139 |     object AExit: TAction
 | 
|---|
| 140 |       Caption = 'Exit'
 | 
|---|
| 141 |       OnExecute = AExitExecute
 | 
|---|
| 142 |     end
 | 
|---|
| 143 |     object AGenerateXml: TAction
 | 
|---|
| 144 |       Caption = 'Generate XML'
 | 
|---|
| 145 |       OnExecute = AGenerateXmlExecute
 | 
|---|
| 146 |     end
 | 
|---|
| 147 |     object ATest: TAction
 | 
|---|
| 148 |       Caption = 'Test'
 | 
|---|
| 149 |       OnExecute = ATestExecute
 | 
|---|
| 150 |       ShortCut = 122
 | 
|---|
| 151 |     end
 | 
|---|
| 152 |     object AConsole: TAction
 | 
|---|
| 153 |       Caption = 'Console'
 | 
|---|
| 154 |       OnExecute = AConsoleExecute
 | 
|---|
| 155 |     end
 | 
|---|
| 156 |     object AFileOpen: TAction
 | 
|---|
| 157 |       Caption = 'Open...'
 | 
|---|
| 158 |       OnExecute = AFileOpenExecute
 | 
|---|
| 159 |     end
 | 
|---|
| 160 |   end
 | 
|---|
| 161 |   object OpenDialog1: TOpenDialog
 | 
|---|
| 162 |     DefaultExt = '.pas'
 | 
|---|
| 163 |     Filter = 'Pascal file (.pas)|*.pas|Any file|*.*'
 | 
|---|
| 164 |     Left = 536
 | 
|---|
| 165 |     Top = 759
 | 
|---|
| 166 |   end
 | 
|---|
| 167 |   object ApplicationInfo1: TApplicationInfo
 | 
|---|
| 168 |     Identification = 1
 | 
|---|
| 169 |     VersionMajor = 1
 | 
|---|
| 170 |     VersionMinor = 0
 | 
|---|
| 171 |     VersionBugFix = 0
 | 
|---|
| 172 |     AuthorsName = 'Chronosoft'
 | 
|---|
| 173 |     EmailContact = 'robie@centrum.cz'
 | 
|---|
| 174 |     AppName = 'xPascal'
 | 
|---|
| 175 |     Description = 'Pascal mutli language transpiler and interpreter'
 | 
|---|
| 176 |     RegistryKey = '\Software\xpascal'
 | 
|---|
| 177 |     RegistryRoot = rrKeyCurrentUser
 | 
|---|
| 178 |     License = 'CC0'
 | 
|---|
| 179 |     Left = 348
 | 
|---|
| 180 |     Top = 274
 | 
|---|
| 181 |   end
 | 
|---|
| 182 | end
 | 
|---|