object MainForm: TMainForm Left = 382 Height = 412 Top = 95 Width = 514 Caption = 'Tunneler' ClientHeight = 389 ClientWidth = 514 Menu = MainMenu1 OnCreate = FormCreate OnKeyDown = FormKeyDown OnKeyUp = FormKeyUp OnShow = FormShow LCLVersion = '0.9.31' object Image1: TImage Left = 0 Height = 372 Top = 0 Width = 514 Align = alClient OnResize = Image1Resize end object StatusBar1: TStatusBar Left = 0 Height = 17 Top = 372 Width = 514 Panels = < item Width = 50 end item Width = 50 end> SimplePanel = False end object TimerDraw: TTimer Interval = 50 OnTimer = TimerDrawTimer left = 99 top = 50 end object MainMenu1: TMainMenu left = 184 top = 16 object MenuItem1: TMenuItem Caption = 'Game' object MenuItem3: TMenuItem Caption = 'New...' OnClick = MenuItem3Click end object MenuItemShowMap: TMenuItem Caption = 'Show map' OnClick = MenuItemShowMapClick end object MenuItem2: TMenuItem Caption = 'Exit' OnClick = MenuItem2Click end end end object TimerEngineTick: TTimer Interval = 10 OnTimer = TimerEngineTickTimer left = 96 top = 104 end end