object FormMain: TFormMain Left = 503 Height = 621 Top = 263 Width = 775 Caption = 'xTactics' ClientHeight = 595 ClientWidth = 775 Menu = MainMenu1 OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow LCLVersion = '1.3' WindowState = wsMaximized object PaintBox1: TPaintBox Left = 0 Height = 569 Top = 0 Width = 775 Align = alClient OnMouseDown = PaintBox1MouseDown OnMouseMove = PaintBox1MouseMove OnMouseUp = PaintBox1MouseUp OnMouseLeave = PaintBox1MouseLeave OnMouseWheelDown = PaintBox1MouseWheelDown OnMouseWheelUp = PaintBox1MouseWheelUp OnPaint = PaintBox1Paint OnResize = PaintBox1Resize end object StatusBar1: TStatusBar Left = 0 Height = 26 Top = 569 Width = 775 Panels = < item Width = 50 end> SimplePanel = False end object MainMenu1: TMainMenu left = 72 top = 48 object MenuItem1: TMenuItem Caption = 'Game' object MenuItem2: TMenuItem Action = Core.AGameNew end object MenuItem3: TMenuItem Action = Core.AGameEnd end object MenuItem7: TMenuItem Action = Core.AGameRestart end object MenuItem4: TMenuItem Action = Core.AGameEndTurn end object MenuItem5: TMenuItem Caption = '-' end object MenuItem6: TMenuItem Action = Core.AExit end end end object Timer1: TTimer Interval = 20 OnTimer = Timer1Timer left = 154 top = 263 end end