inherited frViewDetallesContratoCliente: TfrViewDetallesContratoCliente inherited cxGrid: TcxGrid inherited cxGridView: TcxGridDBTableView inherited cxGridViewID_ARTICULO: TcxGridDBColumn Width = 57 end object cxGridViewTIPO_ARTICULO: TcxGridDBColumn [4] DataBinding.FieldName = 'TIPO_ARTICULO' Visible = False VisibleForCustomization = False end inherited cxGridViewVALORADO: TcxGridDBColumn [5] end inherited cxGridViewVISIBLE: TcxGridDBColumn [6] Caption = #191'Importe visible?' Visible = True end object cxGridViewPROPIEDAD: TcxGridDBColumn [7] DataBinding.FieldName = 'PROPIEDAD' PropertiesClassName = 'TcxRichEditProperties' OnGetPropertiesForEdit = cxGridViewPROPIEDADGetPropertiesForEdit BestFitMaxWidth = 150 Width = 150 IsCaptionAssigned = True end inherited cxGridViewREFERENCIA: TcxGridDBColumn [8] end inherited cxGridViewREFERENCIA_PROVEEDOR: TcxGridDBColumn [9] DataBinding.FieldName = '' end inherited cxGridViewDESCRIPCION: TcxGridDBColumn [10] OnGetPropertiesForEdit = cxGridViewDESCRIPCIONGetPropertiesForEdit Width = 243 end inherited cxGridViewCANTIDAD: TcxGridDBColumn [11] VisibleForCustomization = False Width = 25 end inherited cxGridViewIMPORTEUNIDAD: TcxGridDBColumn [12] VisibleForCustomization = False Width = 34 end inherited cxGridViewINCREMENTO: TcxGridDBColumn [13] DataBinding.FieldName = 'INCREMENTO' Visible = True end inherited cxGridViewDECREMENTO: TcxGridDBColumn [14] DataBinding.FieldName = 'DECREMENTO' Visible = True end inherited cxGridViewIMPORTENETO: TcxGridDBColumn [15] Visible = True Width = 29 end inherited cxGridViewDESCUENTO: TcxGridDBColumn [16] Width = 20 end inherited cxGridViewIMP_UNIDAD_DTO: TcxGridDBColumn [17] end inherited cxGridViewIMPORTEPORTE: TcxGridDBColumn [18] end inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn [19] VisibleForCustomization = False Width = 29 end end end inherited TBXDock1: TTBXDock inherited TBXToolbar1: TTBXToolbar object TBXSubmenuItem1: TTBXSubmenuItem [0] Caption = 'A'#241'adir cap'#237'tulo' DisplayMode = nbdmImageAndText DropdownCombo = True ImageIndex = 12 object TBXItem14: TTBXItem Action = actCapituloArmarioF end object TBXItem17: TTBXItem Action = actCapituloArmarioI end object TBXSeparatorItem10: TTBXSeparatorItem end object TBXItem15: TTBXItem Action = actCapituloBano end object TBXSeparatorItem8: TTBXSeparatorItem end object TBXItem16: TTBXItem Action = actCapituloCocina end object TBXSeparatorItem7: TTBXSeparatorItem end object TBXItem19: TTBXItem Action = actCapituloElectrodomesticos Caption = 'Cap'#237'tulo de electrodom'#233'sticos' end object TBXItem20: TTBXItem Action = actCapituloVarios end object TBXSeparatorItem11: TTBXSeparatorItem end object TBXItem21: TTBXItem Action = actCapituloImportes end object TBXSeparatorItem12: TTBXSeparatorItem end object TBXItem22: TTBXItem Action = actCapituloSepAmbientes end object TBXItem26: TTBXItem Action = actCapituloFreArmCorredera end object TBXItem25: TTBXItem Action = actCapituloFreArmAbatible end object TBXItem24: TTBXItem Action = actCapituloIntArmForrado end object TBXItem23: TTBXItem Action = actCapituloClaSemSuspendido end object TBXItem27: TTBXItem Action = actCapituloServSuministro end object TBXItem28: TTBXItem Action = actCapituloServInstalacion end end object TBXSeparatorItem6: TTBXSeparatorItem [1] end object TBXSeparatorItem9: TTBXSeparatorItem end object TBXItem18: TTBXItem Action = actAsignarDescuento end object TBXLabelItem1: TTBXLabelItem Caption = 'Precio punto' end end object edtPrecioPunto: TcxDBCurrencyEdit Left = 832 Top = 4 AutoSize = False DataBinding.DataField = 'PRECIO_PUNTO' ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [fsBold] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 Height = 21 Width = 80 end object bRecalcularPrecioPunto: TButton Left = 914 Top = 4 Width = 130 Height = 21 TabOrder = 2 end end object cxLookupComboBox1: TcxLookupComboBox [3] Left = 78 Top = 256 ParentFont = False Properties.DropDownListStyle = lsEditList Properties.ImmediatePost = True Properties.KeyFieldNames = 'DESCRIPCION' Properties.ListColumns = < item FieldName = 'DESCRIPCION' end> Properties.ListOptions.ShowHeader = False Properties.ListSource = DAValores Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -13 Style.Font.Name = 'Lucida Console' Style.Font.Style = [] Style.IsFontAssigned = True TabOrder = 3 Visible = False Width = 145 end object cxRichEdit1: TcxRichEdit [4] Left = 78 Top = 225 ParentFont = False Properties.MemoMode = True Lines.Strings = ( 'cxRichEdit1') Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -13 Style.Font.Name = 'Lucida Console' Style.Font.Style = [] Style.IsFontAssigned = True TabOrder = 4 Visible = False Height = 25 Width = 145 end object cxLookupComboBox2: TcxLookupComboBox [5] Left = 78 Top = 280 ParentFont = False Properties.DropDownListStyle = lsEditList Properties.ImmediatePost = True Properties.KeyFieldNames = 'DESCRIPCION' Properties.ListColumns = < item FieldName = 'DESCRIPCION' end> Properties.ListOptions.ShowHeader = False Properties.ListSource = DAPropiedades Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -13 Style.Font.Name = 'Lucida Console' Style.Font.Style = [] Style.IsFontAssigned = True TabOrder = 5 Visible = False Width = 145 end inherited ActionListContenido: TActionList object actAsignarDescuento: TAction Category = 'Operaciones' Caption = 'Asignar descuento' Enabled = False Visible = False OnExecute = actAsignarDescuentoExecute OnUpdate = actAsignarDescuentoUpdate end object actCapituloArmarioF: TAction Category = 'Operaciones' Caption = 'Capitulo frente de armario' OnExecute = actCapituloArmarioFExecute end object actCapituloArmarioI: TAction Category = 'Operaciones' Caption = 'Capitulo interior de armario' OnExecute = actCapituloArmarioIExecute end object actCapituloBano: TAction Category = 'Operaciones' Caption = 'Capitulo de ba'#241'o' Enabled = False Visible = False OnExecute = actCapituloBanoExecute end object actCapituloCocina: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo de cocina' Enabled = False Visible = False OnExecute = actCapituloCocinaExecute end object actCapituloElectrodomesticos: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo de Electrodom'#233'sticos' OnExecute = actCapituloElectrodomesticosExecute end object actCapituloVarios: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo de varios' OnExecute = actCapituloVariosExecute end object actCapituloImportes: TAction Category = 'Operaciones' Caption = 'Capitulo de importes' Enabled = False Visible = False OnExecute = actCapituloImportesExecute end object actCapituloSepAmbientes: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo separaci'#243'n de ambientes' OnExecute = actCapituloSepAmbientesExecute end object actCapituloFreArmCorredera: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo frente de armario corredera' OnExecute = actCapituloFreArmCorrederaExecute end object actCapituloFreArmAbatible: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo frente de armario abatible' OnExecute = actCapituloFreArmAbatibleExecute end object actCapituloIntArmForrado: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo interior de armario forrado' OnExecute = actCapituloIntArmForradoExecute end object actCapituloClaSemSuspendido: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo cl'#225'sico/semisuspendido/suspendido' OnExecute = actCapituloClaSemSuspendidoExecute end object actCapituloServInstalacion: TAction Category = 'Operaciones' Caption = 'Servicio de intalaci'#243'n' OnExecute = actCapituloServInstalacionExecute end object actCapituloServSuministro: TAction Category = 'Operaciones' Caption = 'Servicio de suministro' OnExecute = actCapituloServSuministroExecute end end inherited cxStyleRepository: TcxStyleRepository inherited cxStyle_IMPORTETOTAL: TcxStyle Font.Height = -13 end end object DAPropiedades: TDADataSource Left = 8 Top = 248 end object DAValores: TDADataSource Left = 48 Top = 248 end end