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
        Action = ANewGame
      end
      object MenuItem2: TMenuItem
        Action = AExit
      end
    end
    object MenuItem4: TMenuItem
      Caption = 'View'
      object MenuItem5: TMenuItem
        Action = AShowMap
      end
      object MenuItem6: TMenuItem
        Action = AFullScreen
      end
    end
  end
  object TimerEngineTick: TTimer
    Interval = 10
    OnTimer = TimerEngineTickTimer
    left = 96
    top = 104
  end
  object ActionList1: TActionList
    left = 272
    top = 24
    object AFullScreen: TAction
      Caption = 'Fullscreen mode'
      OnExecute = AFullScreenExecute
      ShortCut = 122
    end
    object AExit: TAction
      Caption = 'Exit'
      OnExecute = AExitExecute
    end
    object ANewGame: TAction
      Caption = 'New game'
      OnExecute = ANewGameExecute
      ShortCut = 16462
    end
    object AShowMap: TAction
      Caption = 'Show map'
      OnExecute = AShowMapExecute
      ShortCut = 123
    end
  end
end