inherited frViewDetallesContratoCliente: TfrViewDetallesContratoCliente inherited ToolBar1: TToolBar inherited ToolButton4: TToolButton Wrap = False end inherited ToolButton14: TToolButton Left = 334 Top = 0 Wrap = True ExplicitLeft = 334 ExplicitTop = 0 end inherited FontName: TJvFontComboBox Left = 0 ExplicitLeft = 0 end inherited FontSize: TEdit Left = 145 ExplicitLeft = 145 end inherited UpDown1: TUpDown Left = 187 ExplicitLeft = 187 end inherited ToolButton13: TToolButton Left = 204 ExplicitLeft = 204 end inherited ToolButton6: TToolButton Left = 212 ExplicitLeft = 212 end inherited ToolButton7: TToolButton Left = 246 ExplicitLeft = 246 end inherited ToolButton8: TToolButton Left = 280 ExplicitLeft = 280 end inherited ToolButton12: TToolButton Left = 314 ExplicitLeft = 314 end inherited ToolButton9: TToolButton Left = 322 ExplicitLeft = 322 end inherited ToolButton10: TToolButton Left = 356 ExplicitLeft = 356 end inherited ToolButton11: TToolButton Left = 390 ExplicitLeft = 390 end end 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] Visible = True 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 cxGridViewDESCUENTO: TcxGridDBColumn [13] Width = 20 end inherited cxGridViewIMPORTENETO: TcxGridDBColumn [14] Visible = False VisibleForCustomization = False Width = 29 end inherited cxGridViewIMPORTEPORTE: TcxGridDBColumn [15] end inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn [16] 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 end object TBXSeparatorItem6: TTBXSeparatorItem [1] end object TBXSeparatorItem9: TTBXSeparatorItem end object TBXItem18: TTBXItem Action = actAsignarDescuento end 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 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