object FormMain: TFormMain
  Left = 692
  Height = 617
  Top = 479
  Width = 770
  Caption = 'Tunneler'
  ClientHeight = 617
  ClientWidth = 770
  DesignTimePPI = 144
  Menu = MainMenu1
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnKeyUp = FormKeyUp
  OnShow = FormShow
  LCLVersion = '3.4.0.0'
  object StatusBar1: TStatusBar
    Left = 0
    Height = 36
    Top = 581
    Width = 770
    Panels = <    
      item
        Width = 74
      end    
      item
        Width = 74
      end    
      item
        Width = 74
      end    
      item
        Width = 74
      end    
      item
        Width = 74
      end    
      item
        Width = 74
      end    
      item
        Width = 74
      end>
    ParentFont = False
    SimplePanel = False
    Visible = False
  end
  object Image1: TImage
    Left = 0
    Height = 581
    Top = 0
    Width = 770
    Align = alClient
    OnResize = Image1Resize
  end
  object TimerDraw: TTimer
    Interval = 50
    OnTimer = TimerDrawTimer
    Left = 149
    Top = 76
  end
  object MainMenu1: TMainMenu
    Left = 276
    Top = 24
    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
      Caption = 'Help'
      object MenuItem9: TMenuItem
        Action = AAbout
      end
    end
  end
  object TimerEngineTick: TTimer
    Interval = 20
    Left = 144
    Top = 156
  end
  object ActionList1: TActionList
    Left = 432
    Top = 48
    object AFullScreen: TAction
      Caption = 'Fullscreen mode'
      OnExecute = AFullScreenExecute
      ShortCut = 122
    end
    object AExit: TAction
      Caption = 'Exit'
      OnExecute = AExitExecute
      ShortCut = 121
    end
    object ANewGame: TAction
      Caption = 'New game'
      OnExecute = ANewGameExecute
      ShortCut = 16462
      Visible = False
    end
    object AShowMap: TAction
      Caption = 'Show map'
      OnExecute = AShowMapExecute
      ShortCut = 123
      Visible = False
    end
    object AAbout: TAction
      Caption = 'About'
      OnExecute = AAboutExecute
    end
    object AShowRawImageDesc: TAction
      Caption = 'Show RawImage Description'
      OnExecute = AShowRawImageDescExecute
      Visible = False
    end
  end
end