inherited FormLicence: TFormLicence
  Left = 299
  Top = 123
  Caption = 'FormLicence'
  ClientHeight = 362
  ClientWidth = 301
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel [0]
    Left = 8
    Top = 8
    Width = 285
    Height = 317
    Shape = bsFrame
  end
  object LabelPlus11: TLabelPlus [1]
    Left = 24
    Top = 20
    Width = 31
    Height = 13
    Caption = '&Firma'
    FocusControl = EditFirma
    Attached = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LabelPlus10: TLabelPlus [2]
    Left = 156
    Top = 156
    Width = 99
    Height = 13
    Caption = '&Intern� pracovn�k'
    FocusControl = EditPrac
    Attached = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LabelPlus1: TLabelPlus [3]
    Left = 24
    Top = 156
    Width = 51
    Height = 13
    Caption = '&Zaplaceno'
    FocusControl = EditSuma
    Attached = True
  end
  object LabelPlus2: TLabelPlus [4]
    Left = 24
    Top = 68
    Width = 91
    Height = 13
    Caption = '&Registra�n� k�d'
    FocusControl = EditReg
    Attached = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LabelPlus3: TLabelPlus [5]
    Left = 156
    Top = 68
    Width = 75
    Height = 13
    Caption = '&Licen�n� k�d'
    FocusControl = EditLic
    Attached = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object LabelPlus4: TLabelPlus [6]
    Left = 24
    Top = 112
    Width = 92
    Height = 13
    Caption = '&Datum zprovozn�n�'
    FocusControl = EditStart
    Attached = True
  end
  object LabelPlus5: TLabelPlus [7]
    Left = 156
    Top = 112
    Width = 74
    Height = 13
    Caption = 'Datum &vypr�en�'
    FocusControl = EditExpir
    Attached = True
  end
  object Label1: TLabel [8]
    Left = 132
    Top = 176
    Width = 13
    Height = 13
    Caption = 'K�'
  end
  object LabelPlus6: TLabelPlus [9]
    Left = 24
    Top = 244
    Width = 50
    Height = 13
    Caption = '&Pozn�mka'
    FocusControl = Memo
    Attached = True
  end
  object LabelPlus7: TLabelPlus [10]
    Left = 24
    Top = 200
    Width = 61
    Height = 13
    Caption = '&Sektor z�jmu'
    FocusControl = EditSektor
    Attached = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  inherited BtnOk: TButton
    Left = 136
    Top = 332
    TabOrder = 10
  end
  inherited BtnCancel: TButton
    Left = 216
    Top = 332
    TabOrder = 11
  end
  object EditFirma: TBrowserLookupEdit [13]
    Left = 24
    Top = 36
    Width = 253
    Height = 21
    Separator = #0
    AllowNull = False
    AllVisible = False
    BrowserOnly = False
    ButtonHint = 'Vybrat z ��seln�ku'
    FieldName = 'ico'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    InputFilter = ifAlphaNumeric
    LookupBrowser = DMmain.BrAllFirmy
    LookupDatabase = 'BRAIN_'
    LookupDispField = 'nazev'
    LookupField = 'ico'
    LookupSQL.Strings = (
      'SELECT nazev, ico'
      'FROM firmy'
      'ORDER BY nazev')
    MaxLength = 100
    Params = <>
    ParentFont = False
    TabOrder = 0
  end
  object EditReg: TBrowserEdit [14]
    Left = 24
    Top = 84
    Width = 121
    Height = 21
    AllowNull = False
    DataType = dtString
    FieldName = 'regcis'
    FloatPrecision = 15
    FloatDigits = 2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    InputFilter = ifAlphaNumeric
    MaxLength = 15
    ParentFont = False
    TabOrder = 1
  end
  object EditLic: TBrowserEdit [15]
    Left = 156
    Top = 84
    Width = 121
    Height = 21
    AllowNull = False
    DataType = dtString
    FieldName = 'liccis'
    FloatPrecision = 15
    FloatDigits = 2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    InputFilter = ifAlphaNumeric
    MaxLength = 15
    ParentFont = False
    TabOrder = 2
  end
  object EditStart: TBrowserDateEdit [16]
    Left = 24
    Top = 128
    Width = 121
    Height = 21
    Separator = #0
    Duration = False
    MaxLength = 0
    TabOrder = 3
    DefaultCurrent = False
    FieldName = 'start'
    DataType = ttDateTime
  end
  object EditExpir: TBrowserDateEdit [17]
    Left = 156
    Top = 128
    Width = 121
    Height = 21
    Separator = #0
    Duration = False
    MaxLength = 0
    TabOrder = 4
    DefaultCurrent = False
    FieldName = 'expir'
    DataType = ttDateTime
  end
  object EditSuma: TBrowserNumEdit [18]
    Left = 24
    Top = 172
    Width = 105
    Height = 21
    DataType = ntFloat
    FieldName = 'zaplaceno'
    FloatDigits = 2
    FloatPrecision = 15
    Increment = 1.000000000000000000
    TabOrder = 5
  end
  object EditPrac: TBrowserLookupEdit [19]
    Left = 156
    Top = 172
    Width = 121
    Height = 21
    Separator = #0
    AllowNull = False
    AllVisible = False
    BrowserOnly = False
    ButtonHint = 'Vybrat z ��seln�ku'
    FieldName = 'id_pracovnik'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    InputFilter = ifAlphaNumeric
    LookupDatabase = 'BRAIN_'
    LookupDispField = 'prijmeni'
    LookupField = 'id'
    LookupSQL.Strings = (
      'SELECT id, prijmeni, jmeno, titul'
      'FROM uzivatele'
      'ORDER BY prijmeni')
    MaxLength = 0
    Params = <>
    ParentFont = False
    TabOrder = 6
  end
  object Memo: TBrowserMemo [20]
    Left = 24
    Top = 260
    Width = 253
    Height = 53
    MaxLength = 255
    TabOrder = 8
    DataType = dtChar
    FieldName = 'pozn'
  end
  object EditSektor: TBrowserLookupEdit [21]
    Left = 24
    Top = 216
    Width = 253
    Height = 21
    Separator = #0
    AllVisible = False
    BrowserOnly = False
    ButtonHint = 'Vybrat z ��seln�ku'
    FieldName = 'id_sektor_zajmu'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    InputFilter = ifAlphaNumeric
    LookupBrowser = DMmain.BrSektoryZajmu
    LookupDatabase = 'BRAIN_'
    LookupField = 'id'
    LookupSQL.Strings = (
      'SELECT id, popis'
      'FROM sektory_zajmu'
      'ORDER BY id')
    MaxLength = 30
    Params = <>
    ParentFont = False
    TabOrder = 7
  end
  object BtnLic: TBitBtn [22]
    Left = 8
    Top = 332
    Width = 81
    Height = 25
    Caption = '&Licencer...'
    TabOrder = 9
    OnClick = BtnLicClick
    Glyph.Data = {
      B6000000424DB600000000000000760000002800000008000000100000000100
      0400000000004000000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0088800888880B
      B088880BB088888008888888888888800888883BB388880BB088880BB088883B
      B388873BB37880BBBB0880BBBB0880BBBB08833BB33888300388}
  end
  inherited FormPos: TFormPos
    Left = 260
    Top = 288
  end
  inherited Wallpaper: TWallpaper
    Left = 100
    Top = 328
  end
end