object ZHist: TZHist
  Left = 261
  Top = 150
  HelpContext = 320
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Nejd�le nev�hern� s�zenky'
  ClientHeight = 337
  ClientWidth = 257
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PopupMenu = PopupMenu1
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object PB1: TGauge
    Left = 4
    Top = 6
    Width = 247
    Height = 21
    ForeColor = clNavy
    BackColor = clYellow
    Progress = 0
    Visible = False
  end
  object Label1: TLabel
    Left = 3
    Top = 4
    Width = 213
    Height = 13
    Caption = 'Vyberte kolik chcete naj�t posledn�ch'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 3
    Top = 17
    Width = 122
    Height = 13
    Caption = 'nev�hern�ch s�zenek'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object ComboBox1: TComboBox
    Left = 5
    Top = 34
    Width = 58
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    Items.Strings = (
      '1'
      '10'
      '50'
      '100'
      '300'
      '500'
      '1000')
    TabOrder = 0
  end
  object StringGrid1: TStringGrid
    Left = 4
    Top = 67
    Width = 249
    Height = 263
    Hint = 'Prav� tla��tko my�i = vyvol�n� skryt�ho menu'
    ColCount = 6
    DefaultColWidth = 32
    DefaultRowHeight = 19
    FixedCols = 0
    RowCount = 15
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSelect]
    ParentShowHint = False
    PopupMenu = PopupMenu1
    ScrollBars = ssVertical
    ShowHint = True
    TabOrder = 3
  end
  object Button1: TButton
    Left = 84
    Top = 33
    Width = 80
    Height = 23
    Caption = '&Hledat'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 190
    Top = 32
    Width = 61
    Height = 25
    Cancel = True
    Caption = '&Opustit'
    TabOrder = 2
    OnClick = Button2Click
  end
  object MSOfficeCaption1: TMSOfficeCaption
    AppNameText.FontKind = fkSystemB
    AppNameText.Visible = True
    CaptionText.Caption = 'Nejd�le nev�hern� s�zenky'
    CaptionText.ColorActive = clYellow
    CaptionText.ColorInactive = clGray
    CaptionText.FontKind = fkSystem
    CaptionText.Visible = True
    CompanyText.FontKind = fkSystemBI
    CompanyText.Visible = True
    Color = clNavy
    Left = 182
    Top = 1
  end
  object PopupMenu1: TPopupMenu
    Left = 214
    Top = 1
    object Vloitdoschrnky1: TMenuItem
      Caption = 'Vlo�it do schr�nky'
      ShortCut = 116
      OnClick = Vloitdoschrnky1Click
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Vsaditszenku1: TMenuItem
      Caption = '&Vsadit s�zenku'
      ShortCut = 0
      OnClick = Vsaditszenku1Click
    end
    object Vsaditvechnyszenky1: TMenuItem
      Caption = 'Vsadit v�echny &s�zenky'
      ShortCut = 0
      OnClick = Vsaditvechnyszenky1Click
    end
  end
end