inherited frViewDatosPresupuesto: TfrViewDatosPresupuesto Width = 360 Height = 163 Constraints.MinHeight = 110 Constraints.MinWidth = 360 DesignSize = ( 360 163) object Bevel1: TBevel Left = 144 Top = 8 Width = 205 Height = 9 Anchors = [akLeft, akTop, akRight] Shape = bsBottomLine end object Label5: TLabel Left = 8 Top = 8 Width = 128 Height = 13 Caption = 'Datos del presupuesto' Font.Charset = DEFAULT_CHARSET Font.Color = clActiveCaption Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 16 Top = 56 Width = 64 Height = 13 Caption = 'Tipo presup.:' end object Label2: TLabel Left = 16 Top = 80 Width = 73 Height = 13 Caption = 'Fecha presup.:' end object Label3: TLabel Left = 16 Top = 104 Width = 62 Height = 13 Caption = 'V'#225'lido hasta:' end object Label4: TLabel Left = 16 Top = 30 Width = 43 Height = 13 Caption = 'Montaje:' end object edtFechaPresupuesto: TcxDBDateEdit Left = 100 Top = 76 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'FECHAPRESUPUESTO' DataBinding.DataSource = DADataSource Style.LookAndFeel.NativeStyle = True Style.Shadow = False Style.ButtonTransparency = ebtNone StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 Width = 245 end object edtVigencia: TcxDBDateEdit Left = 100 Top = 100 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'VIGENCIAPRESUPUESTO' DataBinding.DataSource = DADataSource Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 2 Width = 245 end object eReferencia: TcxDBTextEdit Left = 100 Top = 27 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'REFERENCIA' DataBinding.DataSource = DADataSource Properties.OnEditValueChanged = eReferenciaPropertiesEditValueChanged Style.LookAndFeel.NativeStyle = True StyleDisabled.BorderStyle = ebs3D StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 0 Width = 245 end object cbTipoPresupuesto: TcxDBComboBox Left = 100 Top = 51 DataBinding.DataField = 'TIPO' DataBinding.DataSource = DADataSource Properties.DropDownListStyle = lsFixedList Properties.ImmediatePost = True Properties.OnInitPopup = cbTipoPresupuestoPropertiesInitPopup Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 3 Width = 245 end object DADataSource: TDADataSource Left = 192 end end