object Form1: TForm1
  Left = 298
  Top = 102
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Karetn� hra PR��'
  ClientHeight = 502
  ClientWidth = 783
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 160
    Top = 0
    Width = 119
    Height = 44
    Caption = 'Label1'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clNavy
    Font.Height = -37
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    Visible = False
  end
  object LabelB: TLabel
    Left = 288
    Top = 0
    Width = 103
    Height = 36
    Caption = 'Label1'
    Font.Charset = EASTEUROPE_CHARSET
    Font.Color = clNavy
    Font.Height = -32
    Font.Name = 'Arial'
    Font.Style = [fsBold, fsItalic]
    ParentFont = False
    Visible = False
  end
  object ubrus1: TImage
    Left = 120
    Top = 0
    Width = 100
    Height = 100
    Visible = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 783
    Height = 502
    Align = alClient
    BevelInner = bvLowered
    TabOrder = 0
    object ImP: TImage
      Left = 2
      Top = 2
      Width = 779
      Height = 498
      Align = alClient
      OnMouseDown = ImPMouseDown
      OnMouseMove = ImPMouseMove
      OnMouseUp = ImPMouseUp
    end
    object Panel2: TPanel
      Left = 0
      Top = 0
      Width = 185
      Height = 76
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Color = clOlive
      TabOrder = 0
      Visible = False
      OnMouseUp = ImPMouseUp
      object Label2: TLabel
        Left = 8
        Top = 2
        Width = 67
        Height = 15
        Caption = 'Volba Barvy'
        Font.Charset = EASTEUROPE_CHARSET
        Font.Color = clSilver
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Shape1: TShape
        Left = 2
        Top = 2
        Width = 181
        Height = 72
        Align = alClient
        Brush.Style = bsClear
        OnMouseMove = Shape1MouseMove
        OnMouseUp = ImPMouseUp
      end
      object Image1: TImage
        Left = 8
        Top = 24
        Width = 168
        Height = 42
        OnMouseDown = Image1MouseDown
        OnMouseMove = Image1MouseMove
        OnMouseUp = ImPMouseUp
      end
    end
  end
  object MainMenu1: TMainMenu
    Left = 64
    Top = 8
    object Program1: TMenuItem
      Caption = '&Program'
      OnClick = Program1Click
      object Nastaven1: TMenuItem
        Caption = 'Nastaven�'
        OnClick = Nastaven1Click
      end
      object Autor: TMenuItem
        Caption = 'Program'
        OnClick = AutorClick
      end
      object Informace1: TMenuItem
        Caption = 'Informace'
        OnClick = Informace1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Konec1: TMenuItem
        Caption = 'Konec'
        OnClick = Konec1Click
      end
    end
    object Hra1: TMenuItem
      Caption = '&Hra'
      OnClick = Hra1Click
      object Novhra1: TMenuItem
        Caption = 'Nov� hra'
        OnClick = Novhra1Click
      end
      object Ukonci: TMenuItem
        Caption = 'Ukon�i hru'
        OnClick = UkonciClick
      end
    end
  end
  object Timer1: TTimer
    Interval = 100
    OnTimer = Timer1Timer
    Left = 32
    Top = 96
  end
end