Chip 1999 July/Chip_1999-07_cd.bin/ctenari/Haufer/_SETUP.1/Date.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1999-04-30 | 24.2 KB | 1,134 lines

object Form1: TForm1
  Left = 75
  Top = 17
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Dater 1.0'
  ClientHeight = 446
  ClientWidth = 644
  Color = clSilver
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 384
    Top = 40
    Width = 345
    Height = 441
  end
  object Label4: TLabel
    Left = 384
    Top = 0
    Width = 127
    Height = 13
    Caption = 'oooooooooooooooooo'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Image1: TImage
    Left = 16
    Top = 288
    Width = 345
    Height = 193
    Picture.Data = {<image001.bmp>}
    Stretch = True
  end
  object Label5: TLabel
    Left = 496
    Top = 48
    Width = 32
    Height = 13
    Caption = 'Label5'
  end
  object Label6: TLabel
    Left = 496
    Top = 72
    Width = 32
    Height = 13
    Caption = 'Label6'
  end
  object Label7: TLabel
    Left = 496
    Top = 96
    Width = 32
    Height = 13
    Caption = 'Label7'
  end
  object Label8: TLabel
    Left = 496
    Top = 120
    Width = 32
    Height = 13
    Caption = 'Label8'
  end
  object Label9: TLabel
    Left = 496
    Top = 144
    Width = 32
    Height = 13
    Caption = 'Label9'
  end
  object Label10: TLabel
    Left = 496
    Top = 168
    Width = 38
    Height = 13
    Caption = 'Label10'
  end
  object Label11: TLabel
    Left = 496
    Top = 192
    Width = 38
    Height = 13
    Caption = 'Label11'
  end
  object Label12: TLabel
    Left = 496
    Top = 216
    Width = 38
    Height = 13
    Caption = 'Label12'
  end
  object Label13: TLabel
    Left = 496
    Top = 240
    Width = 38
    Height = 13
    Caption = 'Label13'
  end
  object Label14: TLabel
    Left = 496
    Top = 264
    Width = 38
    Height = 13
    Caption = 'Label14'
  end
  object Label15: TLabel
    Left = 496
    Top = 288
    Width = 38
    Height = 13
    Caption = 'Label15'
  end
  object Label16: TLabel
    Left = 496
    Top = 312
    Width = 38
    Height = 13
    Caption = 'Label16'
  end
  object Label17: TLabel
    Left = 496
    Top = 336
    Width = 38
    Height = 13
    Caption = 'Label17'
  end
  object Label18: TLabel
    Left = 496
    Top = 360
    Width = 38
    Height = 13
    Caption = 'Label18'
  end
  object Label19: TLabel
    Left = 496
    Top = 384
    Width = 38
    Height = 13
    Caption = 'Label19'
  end
  object Label20: TLabel
    Left = 496
    Top = 408
    Width = 38
    Height = 13
    Caption = 'Label20'
  end
  object Label21: TLabel
    Left = 496
    Top = 432
    Width = 38
    Height = 13
    Caption = 'Label21'
  end
  object Label22: TLabel
    Left = 496
    Top = 456
    Width = 38
    Height = 13
    Caption = 'Label22'
  end
  object Label23: TLabel
    Left = 392
    Top = 48
    Width = 38
    Height = 13
    Caption = 'Label23'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label24: TLabel
    Left = 392
    Top = 72
    Width = 38
    Height = 13
    Caption = 'Label24'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label25: TLabel
    Left = 392
    Top = 96
    Width = 38
    Height = 13
    Caption = 'Label25'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label26: TLabel
    Left = 392
    Top = 120
    Width = 38
    Height = 13
    Caption = 'Label26'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label27: TLabel
    Left = 392
    Top = 144
    Width = 38
    Height = 13
    Caption = 'Label27'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label28: TLabel
    Left = 392
    Top = 168
    Width = 38
    Height = 13
    Caption = 'Label28'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label29: TLabel
    Left = 392
    Top = 192
    Width = 38
    Height = 13
    Caption = 'Label29'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label30: TLabel
    Left = 392
    Top = 216
    Width = 38
    Height = 13
    Caption = 'Label30'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label31: TLabel
    Left = 392
    Top = 240
    Width = 38
    Height = 13
    Caption = 'Label31'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label32: TLabel
    Left = 392
    Top = 264
    Width = 38
    Height = 13
    Caption = 'Label32'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label33: TLabel
    Left = 392
    Top = 288
    Width = 38
    Height = 13
    Caption = 'Label33'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label34: TLabel
    Left = 392
    Top = 312
    Width = 38
    Height = 13
    Caption = 'Label34'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label35: TLabel
    Left = 392
    Top = 336
    Width = 38
    Height = 13
    Caption = 'Label35'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
  end
  object Label36: TLabel
    Left = 392
    Top = 360
    Width = 38
    Height = 13
    Caption = 'Label36'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label37: TLabel
    Left = 392
    Top = 384
    Width = 38
    Height = 13
    Caption = 'Label37'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label38: TLabel
    Left = 392
    Top = 408
    Width = 38
    Height = 13
    Caption = 'Label38'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label39: TLabel
    Left = 392
    Top = 432
    Width = 38
    Height = 13
    Caption = 'Label39'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Label40: TLabel
    Left = 392
    Top = 456
    Width = 38
    Height = 13
    Caption = 'Label40'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Bevel2: TBevel
    Left = 488
    Top = 40
    Width = 105
    Height = 441
  end
  object Label41: TLabel
    Left = 600
    Top = 48
    Width = 38
    Height = 13
    Caption = 'Label41'
  end
  object Label42: TLabel
    Left = 600
    Top = 72
    Width = 38
    Height = 13
    Caption = 'Label42'
  end
  object Label43: TLabel
    Left = 600
    Top = 96
    Width = 38
    Height = 13
    Caption = 'Label43'
  end
  object Label44: TLabel
    Left = 600
    Top = 120
    Width = 38
    Height = 13
    Caption = 'Label44'
  end
  object Label45: TLabel
    Left = 600
    Top = 144
    Width = 38
    Height = 13
    Caption = 'Label45'
  end
  object Label46: TLabel
    Left = 600
    Top = 168
    Width = 38
    Height = 13
    Caption = 'Label46'
  end
  object Label47: TLabel
    Left = 600
    Top = 192
    Width = 38
    Height = 13
    Caption = 'Label47'
  end
  object Label48: TLabel
    Left = 600
    Top = 216
    Width = 38
    Height = 13
    Caption = 'Label48'
  end
  object Label49: TLabel
    Left = 600
    Top = 240
    Width = 38
    Height = 13
    Caption = 'Label49'
  end
  object Label50: TLabel
    Left = 600
    Top = 264
    Width = 38
    Height = 13
    Caption = 'Label50'
  end
  object Label51: TLabel
    Left = 600
    Top = 288
    Width = 38
    Height = 13
    Caption = 'Label51'
  end
  object Label52: TLabel
    Left = 600
    Top = 312
    Width = 38
    Height = 13
    Caption = 'Label52'
  end
  object Label53: TLabel
    Left = 600
    Top = 336
    Width = 38
    Height = 13
    Caption = 'Label53'
  end
  object Label54: TLabel
    Left = 600
    Top = 360
    Width = 38
    Height = 13
    Caption = 'Label54'
  end
  object Label55: TLabel
    Left = 600
    Top = 384
    Width = 38
    Height = 13
    Caption = 'Label55'
  end
  object Label56: TLabel
    Left = 600
    Top = 408
    Width = 38
    Height = 13
    Caption = 'Label56'
  end
  object Label57: TLabel
    Left = 600
    Top = 432
    Width = 38
    Height = 13
    Caption = 'Label57'
  end
  object Label58: TLabel
    Left = 600
    Top = 456
    Width = 38
    Height = 13
    Caption = 'Label58'
  end
  object Bevel3: TBevel
    Left = 592
    Top = 40
    Width = 137
    Height = 441
  end
  object Label59: TLabel
    Left = 384
    Top = 16
    Width = 92
    Height = 13
    Caption = 'ooooooooooooo'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clLime
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Bevel4: TBevel
    Left = 384
    Top = 40
    Width = 105
    Height = 441
  end
  object Panel1: TPanel
    Left = 16
    Top = 288
    Width = 345
    Height = 193
    BevelInner = bvLowered
    BevelOuter = bvLowered
    BorderStyle = bsSingle
    Color = clBlue
    TabOrder = 14
    Visible = False
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 48
      Height = 13
      Caption = 'P��jmen�'
      Color = clBlue
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label2: TLabel
      Left = 184
      Top = 8
      Width = 37
      Height = 13
      Caption = 'Jm�no'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BitBtn3: TBitBtn
      Left = 312
      Top = 152
      Width = 25
      Height = 25
      TabOrder = 0
      Visible = False
      OnClick = BitBtn3Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
    end
  end
  object Panel2: TPanel
    Left = 16
    Top = 16
    Width = 65
    Height = 33
    BevelInner = bvLowered
    BevelOuter = bvLowered
    Color = clWhite
    TabOrder = 15
    object Label3: TLabel
      Left = 8
      Top = 8
      Width = 40
      Height = 15
      Alignment = taCenter
      Caption = 'Pond�l�'
      Font.Charset = EASTEUROPE_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Florence'
      Font.Style = []
      ParentFont = False
    end
  end
  object Calendar1: TCalendar
    Left = 16
    Top = 56
    Width = 345
    Height = 201
    TabStop = False
    BorderStyle = bsNone
    Color = clInfoBk
    GridLineWidth = 2
    StartOfWeek = 0
    TabOrder = 0
    OnChange = FormCreate
  end
  object edit1: TEdit
    Left = 24
    Top = 320
    Width = 145
    Height = 21
    Color = clAqua
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    Visible = False
  end
  object Edit2: TEdit
    Left = 200
    Top = 320
    Width = 153
    Height = 21
    Color = clAqua
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    Visible = False
  end
  object ComboBox1: TComboBox
    Left = 24
    Top = 360
    Width = 49
    Height = 21
    Color = clAqua
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ItemHeight = 13
    Items.Strings = (
      '1'
      '2'
      '3'
      '4'
      '5'
      '6'
      '7'
      '8'
      '9'
      '10'
      '11'
      '12'
      '13'
      '14'
      '15'
      '16'
      '17'
      '18'
      '19'
      '20'
      '21'
      '22'
      '23'
      '24'
      '25'
      '26'
      '27'
      '28'
      '29'
      '30'
      '31')
    ParentFont = False
    TabOrder = 3
    Text = 'Den'
    Visible = False
  end
  object ComboBox2: TComboBox
    Left = 96
    Top = 360
    Width = 81
    Height = 21
    Color = clAqua
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ImeMode = imDisable
    ItemHeight = 13
    Items.Strings = (
      'Leden'
      '�nor'
      'B�ezen'
      'Duben'
      'Kv�ten'
      '�erven'
      '�ervenec'
      'Srpen'
      'Z���'
      '��jen'
      'Listopad'
      'Prosinec')
    ParentFont = False
    TabOrder = 4
    Text = 'M�s�c'
    Visible = False
  end
  object ComboBox3: TComboBox
    Left = 200
    Top = 360
    Width = 73
    Height = 21
    Color = clAqua
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ItemHeight = 13
    Items.Strings = (
      '1990'
      '1991'
      '1992'
      '1993'
      '1994'
      '1995'
      '1996'
      '1997'
      '1998'
      '1999'
      '2000')
    ParentFont = False
    TabOrder = 5
    Text = 'Rok'
    Visible = False
  end
  object Button1: TButton
    Left = 72
    Top = 440
    Width = 75
    Height = 25
    Caption = 'Potvrdit'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 6
    Visible = False
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 208
    Top = 440
    Width = 75
    Height = 25
    Caption = 'Vymazat'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 7
    Visible = False
    OnClick = Button2Click
  end
  object ComboBox4: TComboBox
    Left = 24
    Top = 400
    Width = 329
    Height = 21
    Color = clAqua
    ItemHeight = 13
    TabOrder = 8
    Visible = False
    OnChange = Button5Click
  end
  object Button3: TButton
    Left = 72
    Top = 440
    Width = 75
    Height = 25
    Caption = 'Edit'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 9
    Visible = False
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 208
    Top = 440
    Width = 75
    Height = 25
    Caption = 'Vymazat'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 10
    Visible = False
    OnClick = Button4Click
  end
  object Button5: TButton
    Left = 264
    Top = 368
    Width = 75
    Height = 25
    Caption = 'pomoc'
    TabOrder = 11
    Visible = False
    OnClick = Button5Click
    OnExit = Button5Click
  end
  object BitBtn1: TBitBtn
    Left = 264
    Top = 16
    Width = 41
    Height = 25
    Hint = 'Nov� z�znam'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 12
    TabStop = False
    OnClick = Zpis1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555FFFFFFFFFF55555000000000055555577777777775FFFF00B8B8B8B8B0
      0000775F5555555777770B0B8B8B8B8B0FF07F75F555555575F70FB0B8B8B8B8
      B0F07F575FFFFFFFF7F70BFB0000000000F07F557777777777570FBFBF0FFFFF
      FFF07F55557F5FFFFFF70BFBFB0F000000F07F55557F777777570FBFBF0FFFFF
      FFF075F5557F5FFFFFF750FBFB0F000000F0575FFF7F777777575700000FFFFF
      FFF05577777F5FF55FF75555550F00FF00005555557F775577775555550FFFFF
      0F055555557F55557F755555550FFFFF00555555557FFFFF7755555555000000
      0555555555777777755555555555555555555555555555555555}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 320
    Top = 16
    Width = 41
    Height = 25
    Hint = 'Editace z�znamu'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 13
    TabStop = False
    OnClick = Editace1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
      000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
      00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
      F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
      0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
      FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
      FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
      0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
      00333377737FFFFF773333303300000003333337337777777333}
    NumGlyphs = 2
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 488
    Width = 734
    Height = 19
    Align = alNone
    Panels = <
      item
        Width = 40
      end
      item
        Alignment = taCenter
        Text =
          'Copyright � 1999 by Haufer Michal.        V�echna pr�va vyhrazen' +
          'a.'
        Width = 655
      end
      item
        Width = 50
      end>
    SimplePanel = False
    SizeGrip = False
  end
  object BitBtn4: TBitBtn
    Left = 16
    Top = 264
    Width = 33
    Height = 17
    TabOrder = 17
    TabStop = False
    OnClick = BitBtn4Click
    Glyph.Data = {
      46010000424D46010000000000007600000028000000200000000D0000000100
      040000000000D000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333333333333333333333333333FF33333333333330033
      33333333333F88F33333333333009033333333333F8838F33333333300999033
      3333333F883338FFFFFF33009999900000003F88333338888888009999999999
      9990883FF33333FFFFF8330099999000000033883FF338888888333300999033
      33333333883FF8F3333333333300903333333333338838F33333333333330033
      3333333333338833333333333333333333333333333333333333333333333333
      33333333333333333333}
    Layout = blGlyphTop
    NumGlyphs = 2
  end
  object BitBtn5: TBitBtn
    Left = 328
    Top = 264
    Width = 33
    Height = 17
    TabOrder = 18
    TabStop = False
    OnClick = BitBtn5Click
    Glyph.Data = {
      46010000424D460100000000000076000000280000001E0000000D0000000100
      040000000000D000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333330033333333333333333333333333333300333333333333
      0033333333333333330033333333333309003333333333333300333333333333
      0999003333333333330033333300000009999900333333333300333333099999
      9999999900333333330033333300000009999900333333333300333333333333
      0999003333333333330033333333333309003333333333333300333333333333
      0033333333333333330033333333333333333333333333333300333333333333
      33333333333333333300}
    Layout = blGlyphRight
  end
  object Edit3: TMaskEdit
    Left = 96
    Top = 16
    Width = 25
    Height = 21
    TabStop = False
    TabOrder = 19
    OnExit = Edit3Exit
  end
  object Edit5: TMaskEdit
    Left = 216
    Top = 16
    Width = 33
    Height = 21
    TabStop = False
    TabOrder = 20
    OnExit = Edit5Exit
  end
  object Edit4: TComboBox
    Left = 136
    Top = 16
    Width = 73
    Height = 21
    TabStop = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ImeMode = imDisable
    ItemHeight = 13
    Items.Strings = (
      'Leden'
      '�nor'
      'B�ezen'
      'Duben'
      'Kv�ten'
      '�erven'
      '�ervenec'
      'Srpen'
      'Z���'
      '��jen'
      'Listopad'
      'Prosinec')
    ParentFont = False
    TabOrder = 21
    OnExit = Edit4Exit
  end
  object MainMenu1: TMainMenu
    Left = 192
    Top = 65520
    object File1: TMenuItem
      Caption = '&Soubor'
      object Nov1: TMenuItem
        Caption = 'Nov� datab�ze'
        OnClick = Nov1Click
      end
      object Otevt1: TMenuItem
        Caption = 'Otev��t'
        OnClick = Otevt1Click
      end
      object Uloitjako1: TMenuItem
        Caption = 'Ulo�it jako ..'
        OnClick = Uloitjako1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'Konec'
        ShortCut = 32856
        OnClick = Exit1Click
      end
    end
    object Tools1: TMenuItem
      Caption = '&N�stroje'
      object Zpis1: TMenuItem
        Caption = 'Nov� z�znam'
        OnClick = Zpis1Click
      end
      object Editace1: TMenuItem
        Caption = 'Editace z�znamu'
        OnClick = Editace1Click
      end
      object Vyhledvnjmen1: TMenuItem
        Caption = 'Vyhled�v�n� jmen'
        OnClick = Vyhledvnjmen1Click
      end
      object Monosti1: TMenuItem
        Caption = 'Mo�nosti'
        OnClick = Monosti1Click
      end
    end
    object Npovda1: TMenuItem
      Caption = 'N�&pov�da'
      ShortCut = 112
      OnClick = Npovda1Click
    end
  end
  object Timer1: TTimer
    Interval = 5000
    OnTimer = Timer1Timer
    Left = 224
    Top = 65528
  end
  object OpenDialog1: TOpenDialog
    Filter = 'datov� soubory (*.dat)|*.dat|v�echny soubory (*.*)|*.*'
    InitialDir = '.'
    Left = 152
    Top = 65528
  end
  object SaveDialog1: TSaveDialog
    Filter = 'datov� soubory (*.dat)|*.dat|v�echny soubory (*.*)|*.*'
    InitialDir = '.'
    Left = 120
    Top = 65528
  end
end