inherited FormSmlouvy: TFormSmlouvy Left = 265 Top = 111 HelpContext = 148 Caption = 'FormSmlouvy' ClientHeight = 336 ClientWidth = 380 PixelsPerInch = 96 TextHeight = 13 object Frame1: TFrame [0] Left = 8 Top = 8 Width = 361 Height = 289 end object LabelPlus1: TLabelPlus [1] Left = 28 Top = 64 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 = 252 Top = 108 Width = 31 Height = 13 Caption = '&Datum' FocusControl = BrowserDateEdit1 Attached = True end object LabelPlus3: TLabelPlus [3] Left = 28 Top = 108 Width = 18 Height = 13 Caption = '&Typ' FocusControl = BrowserLookupEdit1 Attached = True end object LabelPlus4: TLabelPlus [4] Left = 28 Top = 156 Width = 43 Height = 13 Caption = 'Soubor &1' FocusControl = BrowserFileEdit1 Attached = True end object LabelPlus5: TLabelPlus [5] Left = 28 Top = 200 Width = 43 Height = 13 Caption = 'Soubor &2' FocusControl = BrowserFileEdit2 Attached = True end object LabelPlus6: TLabelPlus [6] Left = 28 Top = 244 Width = 43 Height = 13 Caption = 'Soubor &3' FocusControl = BrowserFileEdit3 Attached = True end object LabelPlus7: TLabelPlus [7] Left = 28 Top = 20 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 [8] Left = 164 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 LabelPlus8: TLabelPlus [9] Left = 244 Top = 244 Width = 46 Height = 13 Caption = '&Rich Text' FocusControl = BrowserRTFEdit1 Attached = True end inherited BtnOk: TButton Left = 212 Top = 304 TabOrder = 9 end inherited BtnCancel: TButton Left = 292 Top = 304 TabOrder = 10 end object BrowserEdit1: TBrowserEdit [12] Left = 28 Top = 80 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 = 0 ParentFont = False TabOrder = 2 end object BrowserDateEdit1: TBrowserDateEdit [13] Left = 252 Top = 124 Width = 93 Height = 21 Separator = #0 Duration = False MaxLength = 0 TabOrder = 4 DefaultCurrent = False FieldName = 'datum' DataType = ttDateTime end object BrowserLookupEdit1: TBrowserLookupEdit [14] Left = 28 Top = 124 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_smlouvy' 'WHERE typ is not null' 'ORDER BY typ') MaxLength = 0 Params = <> TabOrder = 3 end object BrowserFileEdit1: TBrowserFileEdit [15] Left = 28 Top = 172 Width = 317 Height = 21 Separator = #0 AdvanceFocus = True DialogOptions = [ofHideReadOnly, ofEnableSizing] ButtonHint = 'Proch�zet' ClickKey = 120 NumGlyphs = 1 TabOrder = 5 FieldName = 'soubor1' end object BrowserFileEdit2: TBrowserFileEdit [16] Left = 28 Top = 216 Width = 317 Height = 21 Separator = #0 AdvanceFocus = True DialogOptions = [ofHideReadOnly, ofEnableSizing] ButtonHint = 'Proch�zet' ClickKey = 120 NumGlyphs = 1 TabOrder = 6 FieldName = 'soubor2' end object BrowserFileEdit3: TBrowserFileEdit [17] Left = 28 Top = 260 Width = 201 Height = 21 Separator = #0 AdvanceFocus = True DialogOptions = [ofHideReadOnly, ofEnableSizing] ButtonHint = 'Proch�zet' ClickKey = 120 NumGlyphs = 1 TabOrder = 7 FieldName = 'soubor3' end object BrowserCounterEdit1: TBrowserCounterEdit [18] Left = 28 Top = 36 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 = 'Smlouvy' TabOrder = 0 end object EditFirma: TBrowserLookupEdit [19] Left = 164 Top = 36 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 [20] Left = 244 Top = 260 Width = 101 Height = 21 Separator = #0 FieldName = 'rtf' MaxLength = 0 TabOrder = 8 end inherited FormPos: TFormPos Top = 308 end inherited Wallpaper: TWallpaper Top = 308 end end