object MainForm: TMainForm
  Left = 382
  Height = 412
  Top = 95
  Width = 514
  Caption = 'Tunneler'
  ClientHeight = 385
  ClientWidth = 514
  Menu = MainMenu1
  OnClose = FormClose
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnKeyUp = FormKeyUp
  OnShow = FormShow
  LCLVersion = '0.9.31'
  object StatusBar1: TStatusBar
    Left = 0
    Height = 21
    Top = 364
    Width = 514
    Panels = <    
      item
        Width = 50
      end    
      item
        Width = 50
      end    
      item
        Width = 50
      end    
      item
        Width = 50
      end    
      item
        Width = 50
      end    
      item
        Width = 50
      end    
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object Image1: TImage
    Left = 0
    Height = 364
    Top = 0
    Width = 514
    Align = alClient
    OnMouseLeave = Image1MouseLeave
    OnResize = Image1Resize
  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
      object MenuItem8: TMenuItem
        Action = AShowRawImageDesc
      end
    end
    object MenuItem7: TMenuItem
      Action = AAbout
    end
  end
  object TimerEngineTick: TTimer
    Interval = 20
    OnTimer = TimerEngineTickTimer
    left = 96
    top = 104
  end
  object ActionList1: TActionList
    left = 288
    top = 32
    object AFullScreen: TAction
      Caption = 'Fullscreen mode'
      OnExecute = AFullScreenExecute
      ShortCut = 122
    end
    object AExit: TAction
      Caption = 'Exit'
      OnExecute = AExitExecute
      ShortCut = 32883
    end
    object ANewGame: TAction
      Caption = 'New game'
      OnExecute = ANewGameExecute
      ShortCut = 16462
    end
    object AShowMap: TAction
      Caption = 'Show map'
      OnExecute = AShowMapExecute
      ShortCut = 123
    end
    object AAbout: TAction
      Caption = 'About'
    end
    object AShowRawImageDesc: TAction
      Caption = 'Show RawImage Description'
      OnExecute = AShowRawImageDescExecute
    end
  end
  object CoolTranslator1: TCoolTranslator
    POFilesFolder = 'Languages'
    left = 288
    top = 104
  end
end