inherited frViewDetallesContratoCliente: TfrViewDetallesContratoCliente Width = 975 Height = 494 inherited ToolBar1: TToolBar Width = 975 Height = 24 inherited ToolButton4: TToolButton Wrap = False end inherited ToolButton14: TToolButton Left = 334 Top = 0 ExplicitLeft = 334 ExplicitTop = 0 end inherited FontName: TJvFontComboBox Left = 368 Top = 0 ExplicitLeft = 368 ExplicitTop = 0 end inherited FontSize: TEdit Left = 513 Top = 0 ExplicitLeft = 513 ExplicitTop = 0 end inherited UpDown1: TUpDown Left = 555 Top = 0 ExplicitLeft = 555 ExplicitTop = 0 end inherited ToolButton13: TToolButton Left = 572 Top = 0 ExplicitLeft = 572 ExplicitTop = 0 end inherited ToolButton6: TToolButton Left = 580 Top = 0 ExplicitLeft = 580 ExplicitTop = 0 end inherited ToolButton7: TToolButton Left = 614 Top = 0 ExplicitLeft = 614 ExplicitTop = 0 end inherited ToolButton8: TToolButton Left = 648 Top = 0 ExplicitLeft = 648 ExplicitTop = 0 end inherited ToolButton12: TToolButton Left = 682 Top = 0 ExplicitLeft = 682 ExplicitTop = 0 end inherited ToolButton9: TToolButton Left = 690 Top = 0 ExplicitLeft = 690 ExplicitTop = 0 end inherited ToolButton10: TToolButton Left = 724 Top = 0 ExplicitLeft = 724 ExplicitTop = 0 end inherited ToolButton11: TToolButton Left = 758 Top = 0 ExplicitLeft = 758 ExplicitTop = 0 end end inherited cxGrid: TcxGrid Top = 50 Width = 975 Height = 444 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 cxGridViewVISIBLE2: TcxGridDBColumn [5] Visible = True BestFitMaxWidth = 20 end inherited cxGridViewVISIBLE: TcxGridDBColumn [6] Caption = #191'Valorado?' Visible = True BestFitMaxWidth = 20 end object cxGridViewPROPIEDAD: TcxGridDBColumn [7] Caption = 'Propiedad' DataBinding.FieldName = 'PROPIEDAD' PropertiesClassName = 'TcxRichEditProperties' OnGetPropertiesForEdit = cxGridViewPROPIEDADGetPropertiesForEdit Width = 138 end inherited cxGridViewREFERENCIA: TcxGridDBColumn [8] end inherited cxGridViewREFERENCIA_PROVEEDOR: TcxGridDBColumn [9] DataBinding.FieldName = '' end inherited cxGridViewDESCRIPCION: TcxGridDBColumn [10] OnGetPropertiesForEdit = cxGridViewDESCRIPCIONGetPropertiesForEdit Width = 186 end inherited cxGridViewCANTIDAD: TcxGridDBColumn [11] VisibleForCustomization = False Width = 20 end inherited cxGridViewIMPORTEUNIDAD: TcxGridDBColumn [12] VisibleForCustomization = False Width = 26 end inherited cxGridViewDESCUENTO: TcxGridDBColumn [13] VisibleForCustomization = False 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 = 22 end end end inherited TBXDock1: TTBXDock Top = 24 Width = 975 inherited TBXToolbar1: TTBXToolbar ExplicitWidth = 663 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 TBXItem22: TTBXItem Action = actCapituloObra 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.KeyFieldNames = 'DESCRIPCION' Properties.ListColumns = < item SortOrder = soAscending FieldName = 'DESCRIPCION' end> Properties.ListOptions.ShowHeader = False Properties.ListOptions.SyncMode = True Properties.ListSource = DAValores Properties.OnEditValueChanged = cxLookupComboBox1PropertiesEditValueChanged 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' OnExecute = actCapituloBanoExecute end object actCapituloCocina: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo de cocina' 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' OnExecute = actCapituloImportesExecute end object actCapituloObra: TAction Category = 'Operaciones' Caption = 'Cap'#237'tulo de obra' OnExecute = actCapituloObraExecute 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