inherited FormZakaznici: TFormZakaznici Top = 218 HelpContext = 142 Caption = 'FormZakaznici' ClientHeight = 225 ClientWidth = 343 PixelsPerInch = 96 TextHeight = 13 object LabelPlus4: TLabelPlus [0] Left = 33 Top = 121 Width = 24 Height = 13 Caption = '&Zdroj' FocusControl = EditZdroj Attached = True end object Frame1: TFrame [1] Left = 8 Top = 4 Width = 325 Height = 181 end object LabelPlus1: TLabelPlus [2] Left = 32 Top = 24 Width = 31 Height = 13 Caption = '&Firma' FocusControl = BrowserLookupEdit2 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 [3] Left = 32 Top = 72 Width = 126 Height = 13 Caption = '&Obdob� spolupr�ce od - do' FocusControl = BrowserNumEdit1 Attached = True end object BrowserDataGrabber1: TBrowserDataGrabber [4] Left = 32 Top = 184 Width = 20 Height = 19 FieldNames.Strings = ( 'ico') GroupIndex = 0 end inherited BtnOk: TButton Left = 176 Top = 192 TabOrder = 5 end inherited BtnCancel: TButton Left = 256 Top = 192 TabOrder = 6 end object EditZdroj: TBrowserLookupEdit [7] Left = 33 Top = 137 Width = 176 Height = 21 Separator = #0 AllVisible = False BrowserOnly = False ButtonHint = 'Vybrat z ��seln�ku' FieldName = 'zdroj' InputFilter = ifAlphaNumeric ItemMustExist = False LookupDatabase = 'BRAIN_' LookupField = 'zdroj' LookupSQL.Strings = ( 'SELECT DISTINCT zdroj' 'FROM f_zakaznici' 'WHERE zdroj is not null' 'ORDER BY zdroj') MaxLength = 0 Params = <> TabOrder = 4 end object BrowserLookupEdit2: TBrowserLookupEdit [8] Left = 32 Top = 40 Width = 277 Height = 21 Separator = #0 AllowNull = False AllVisible = False BrowserOnly = False ButtonHint = 'Vybrat z ��seln�ku' FieldName = 'nazev' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] InputFilter = ifAlphaNumeric LookupBrowser = DMmain.BrAllFirmy ItemMustExist = False LookupDatabase = 'BRAIN_' LookupField = 'nazev' LookupSQL.Strings = ( 'SELECT nazev, mesto, ico' 'FROM firmy' 'ORDER BY nazev') MaxLength = 0 Params = <> ParentFont = False TabOrder = 0 end object BrowserNumEdit1: TBrowserNumEdit [9] Left = 32 Top = 88 Width = 61 Height = 21 FieldName = 'od' FloatDigits = 2 FloatFormat = ffGeneral FloatPrecision = 15 Increment = 1.000000000000000000 MaxValue = 3000.000000000000000000 MinValue = 1900.000000000000000000 TabOrder = 1 end object BrowserNumEdit2: TBrowserNumEdit [10] Left = 116 Top = 88 Width = 61 Height = 21 FieldName = 'do' FloatDigits = 2 FloatFormat = ffGeneral FloatPrecision = 15 Increment = 1.000000000000000000 MaxValue = 3000.000000000000000000 MinValue = 1900.000000000000000000 TabOrder = 2 end object BrowserCheckBox1: TBrowserCheckBox [11] Left = 216 Top = 88 Width = 97 Height = 17 Caption = 'O&bchoduje se' TabOrder = 3 DefaultValue = False FieldName = 'aktivni' end inherited FormPos: TFormPos Left = 4 Top = 196 end end