inherited FormUzivatele: TFormUzivatele Left = 302 Top = 160 HelpContext = 167 Caption = 'FormUzivatele' ClientHeight = 271 ClientWidth = 345 PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel [0] Left = 8 Top = 8 Width = 329 Height = 225 Shape = bsFrame end object LabelPlus1: TLabelPlus [1] Left = 85 Top = 36 Width = 48 Height = 13 AttachType = atLeft Caption = '&P��jmen�' FocusControl = BrowserEdit1 Attached = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object LabelPlus2: TLabelPlus [2] Left = 113 Top = 100 Width = 20 Height = 13 AttachType = atLeft Caption = '&Titul' FocusControl = BrowserLookupEdit2 Attached = True end object LabelPlus3: TLabelPlus [3] Left = 102 Top = 68 Width = 31 Height = 13 AttachType = atLeft Caption = '&Jm�no' FocusControl = BrowserEdit2 Attached = True end object LabelPlus4: TLabelPlus [4] Left = 90 Top = 132 Width = 43 Height = 13 AttachType = atLeft Caption = '&Odd�len�' FocusControl = BrowserLookupEdit1 Attached = True end object LabelPlus5: TLabelPlus [5] Left = 24 Top = 176 Width = 109 Height = 13 AttachType = atLeft Caption = 'P�ihla�o&vac� jm�no' FocusControl = EditSysname Attached = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Image1: TImage [6] Left = 28 Top = 28 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object LabelPlus6: TLabelPlus [7] Left = 106 Top = 204 Width = 27 Height = 13 AttachType = atLeft Caption = '&Heslo' FocusControl = EditPwd Attached = True end object Bevel2: TBevel [8] Left = 24 Top = 160 Width = 297 Height = 9 Shape = bsTopLine end inherited BtnOk: TButton Left = 180 Top = 240 TabOrder = 6 end inherited BtnCancel: TButton Left = 260 Top = 240 TabOrder = 7 end object BrowserEdit1: TBrowserEdit [11] Left = 140 Top = 32 Width = 177 Height = 21 AllowNull = False DataType = dtString FieldName = 'prijmeni' 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 = 50 ParentFont = False TabOrder = 0 end object BrowserEdit2: TBrowserEdit [12] Left = 140 Top = 64 Width = 121 Height = 21 DataType = dtString FieldName = 'jmeno' FloatPrecision = 15 FloatDigits = 2 InputFilter = ifAlphaNumeric MaxLength = 50 TabOrder = 1 end object BrowserLookupEdit1: TBrowserLookupEdit [13] Left = 140 Top = 128 Width = 177 Height = 21 Separator = #0 AllVisible = False BrowserOnly = False ButtonHint = 'Vybrat z ��seln�ku' FieldName = 'oddeleni' InputFilter = ifAlphaNumeric ItemMustExist = False LookupDatabase = 'BRAIN_' LookupField = 'oddeleni' LookupSQL.Strings = ( 'SELECT DISTINCT oddeleni' 'FROM uzivatele' 'WHERE oddeleni is not null' 'ORDER BY oddeleni') MaxLength = 50 Params = <> TabOrder = 3 end object BrowserLookupEdit2: TBrowserLookupEdit [14] Left = 140 Top = 96 Width = 85 Height = 21 Separator = #0 AllVisible = False BrowserOnly = False ButtonHint = 'Vybrat z ��seln�ku' FieldName = 'titul' InputFilter = ifAlphaNumeric ItemMustExist = False LookupDatabase = 'BRAIN_' LookupField = 'titul' LookupSQL.Strings = ( 'SELECT DISTINCT titul' 'FROM uzivatele' 'WHERE titul is not null' 'ORDER BY titul') MaxLength = 20 Params = <> TabOrder = 2 end object EditSysname: TBrowserEdit [15] Left = 140 Top = 172 Width = 121 Height = 21 AllowNull = False DataType = dtString FieldName = 'sysname' 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 = 0 ParentFont = False TabOrder = 4 end object EditPwd: TBrowserEdit [16] Left = 140 Top = 200 Width = 121 Height = 21 DataType = dtString FieldName = 'syspwd' FloatPrecision = 15 FloatDigits = 2 InputFilter = ifAlphaNumeric MaxLength = 20 PasswordChar = '*' TabOrder = 5 end inherited FormPos: TFormPos Top = 236 end end