inherited FormDokumenty: TFormDokumenty Left = 243 Top = 159 HelpContext = 147 Caption = 'FormDokumenty' ClientHeight = 293 ClientWidth = 366 PixelsPerInch = 96 TextHeight = 13 object Frame1: TFrame [0] Left = 8 Top = 8 Width = 349 Height = 249 end object LabelPlus1: TLabelPlus [1] Left = 24 Top = 68 Width = 31 Height = 13 Caption = '&N�zev' FocusControl = BrowserEdit1 Attached = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object LabelPlus2: TLabelPlus [2] Left = 248 Top = 160 Width = 31 Height = 13 Caption = '&Datum' FocusControl = BrowserDateEdit1 Attached = True end object LabelPlus4: TLabelPlus [3] Left = 24 Top = 208 Width = 34 Height = 13 Caption = '&Soubor' FocusControl = BrowserFileEdit1 Attached = True end object LabelPlus3: TLabelPlus [4] Left = 25 Top = 161 Width = 18 Height = 13 Caption = '&Typ' FocusControl = BrowserLookupEdit1 Attached = True end object LabelPlus5: TLabelPlus [5] Left = 24 Top = 116 Width = 26 Height = 13 Caption = '&Popis' FocusControl = BrowserEdit2 Attached = True end object LabelPlus6: TLabelPlus [6] Left = 24 Top = 24 Width = 29 Height = 13 Caption = '��&slo' FocusControl = BrowserCounterEdit1 Attached = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object LabelPlus11: TLabelPlus [7] Left = 160 Top = 24 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 LabelPlus7: TLabelPlus [8] Left = 248 Top = 208 Width = 46 Height = 13 Caption = '&Rich Text' FocusControl = BrowserRTFEdit1 Attached = True end inherited BtnOk: TButton Left = 204 Top = 264 TabOrder = 8 end inherited BtnCancel: TButton Left = 284 Top = 264 TabOrder = 9 end object BrowserEdit1: TBrowserEdit [11] Left = 24 Top = 84 Width = 317 Height = 21 DataType = dtString FieldName = 'nazev' FloatPrecision = 15 FloatDigits = 2 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] InputFilter = ifAlphaNumeric MaxLength = 50 ParentFont = False TabOrder = 2 end object BrowserDateEdit1: TBrowserDateEdit [12] Left = 248 Top = 176 Width = 93 Height = 21 Separator = #0 Duration = False MaxLength = 0 TabOrder = 5 DefaultCurrent = False FieldName = 'datum' DataType = ttDateTime end object BrowserFileEdit1: TBrowserFileEdit [13] Left = 24 Top = 224 Width = 209 Height = 21 Separator = #0 AdvanceFocus = True DialogOptions = [ofHideReadOnly, ofEnableSizing] ButtonHint = 'Proch�zet' ClickKey = 120 NumGlyphs = 1 TabOrder = 6 FieldName = 'soubor' end object BrowserLookupEdit1: TBrowserLookupEdit [14] Left = 25 Top = 177 Width = 208 Height = 21 Separator = #0 AllVisible = False BrowserOnly = False ButtonHint = 'Vybrat z ��seln�ku' FieldName = 'typ' InputFilter = ifAlphaNumeric ItemMustExist = False LookupDatabase = 'BRAIN_' LookupField = 'typ' LookupSQL.Strings = ( 'SELECT DISTINCT typ' 'FROM f_dokumenty' 'WHERE typ is not null' 'ORDER BY typ') MaxLength = 20 Params = <> TabOrder = 4 end object BrowserEdit2: TBrowserEdit [15] Left = 24 Top = 132 Width = 317 Height = 21 DataType = dtString FieldName = 'popis' FloatPrecision = 15 FloatDigits = 2 InputFilter = ifAlphaNumeric MaxLength = 100 TabOrder = 3 end object BrowserCounterEdit1: TBrowserCounterEdit [16] Left = 24 Top = 40 Width = 121 Height = 21 Separator = #0 AllowNull = False FieldName = 'cislo' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] InputFilter = ifAlphaNumeric LookupBrowser = DMmain.BrRady LookupDatabase = 'BRAIN_' MaxLength = 25 ParentFont = False Purpose = 'Dokumenty' TabOrder = 0 end object EditFirma: TBrowserLookupEdit [17] Left = 160 Top = 40 Width = 181 Height = 21 Separator = #0 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 = 1 end object BrowserRTFEdit1: TBrowserRTFEdit [18] Left = 248 Top = 224 Width = 93 Height = 21 Separator = #0 FieldName = 'rtf' MaxLength = 0 TabOrder = 7 end inherited FormPos: TFormPos Top = 260 end inherited Wallpaper: TWallpaper Top = 260 end end