inherited FormSpoluprace: TFormSpoluprace Left = 343 Top = 249 HelpContext = 162 Caption = 'FormSpoluprace' ClientHeight = 209 PixelsPerInch = 96 TextHeight = 13 object Frame1: TFrame [0] Left = 8 Top = 4 Width = 305 Height = 169 end object LabelPlus1: TLabelPlus [1] Left = 28 Top = 24 Width = 45 Height = 13 Caption = '&Zkratka' 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 = 28 Top = 72 Width = 26 Height = 13 Caption = '&Popis' FocusControl = BrowserEdit2 Attached = True end object LabelPlus3: TLabelPlus [3] Left = 28 Top = 120 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 Top = 180 TabOrder = 3 end inherited BtnCancel: TButton Top = 180 TabOrder = 4 end object BrowserEdit1: TBrowserEdit [6] Left = 28 Top = 40 Width = 265 Height = 21 AllowNull = False DataType = dtString FieldName = 'id' 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 = 30 ParentFont = False TabOrder = 0 end object BrowserEdit2: TBrowserEdit [7] Left = 28 Top = 88 Width = 265 Height = 21 DataType = dtString FieldName = 'popis' FloatPrecision = 15 FloatDigits = 2 InputFilter = ifAlphaNumeric MaxLength = 50 TabOrder = 1 end object EditSektor: TBrowserLookupEdit [8] Left = 28 Top = 136 Width = 229 Height = 21 Separator = #0 AllVisible = False BrowserOnly = False ButtonHint = 'Vybrat z ��seln�ku' DirectInput = False 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 = 2 end inherited FormPos: TFormPos Top = 176 end inherited Wallpaper: TWallpaper Top = 176 end end