inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente Width = 1029 Height = 416 inherited ToolBar1: TToolBar Width = 1029 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 = 1029 Height = 366 inherited cxGridView: TcxGridDBTableView inherited cxGridViewID: TcxGridDBColumn VisibleForCustomization = False end inherited cxGridViewPOSICION: TcxGridDBColumn VisibleForCustomization = False end inherited cxGridViewTIPO: TcxGridDBColumn VisibleForCustomization = False Width = 32 end inherited cxGridViewID_ARTICULO: TcxGridDBColumn VisibleForCustomization = False 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 = 64 Width = 64 IsCaptionAssigned = True end inherited cxGridViewREFERENCIA: TcxGridDBColumn [8] end inherited cxGridViewREFERENCIA_PROVEEDOR: TcxGridDBColumn [9] DataBinding.FieldName = '' end inherited cxGridViewDESCRIPCION: TcxGridDBColumn [10] OnGetPropertiesForEdit = cxGridViewDESCRIPCIONGetPropertiesForEdit Width = 403 end inherited cxGridViewCANTIDAD: TcxGridDBColumn [11] VisibleForCustomization = False Width = 41 end inherited cxGridViewIMPORTEUNIDAD: TcxGridDBColumn [12] VisibleForCustomization = False Width = 56 end inherited cxGridViewDESCUENTO: TcxGridDBColumn [13] Width = 33 end inherited cxGridViewIMPORTENETO: TcxGridDBColumn [14] Visible = False VisibleForCustomization = False Width = 29 end inherited cxGridViewIMPORTEPORTE: TcxGridDBColumn [15] end inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn [16] VisibleForCustomization = False Width = 48 end end end inherited TBXDock1: TTBXDock Top = 24 Width = 1029 inherited TBXToolbar1: TTBXToolbar DockPos = 0 ExplicitWidth = 869 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 TBXSeparatorItem8: TTBXSeparatorItem end object TBXItem15: TTBXItem Action = actCapituloBano end object TBXSeparatorItem7: TTBXSeparatorItem end object TBXItem16: TTBXItem Action = actCapituloCocina end object TBXSeparatorItem10: 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 [3] end object TBXSeparatorItem9: TTBXSeparatorItem end object TBXItem18: TTBXItem Action = actAsignarDescuento end object TBXLabelItem1: TTBXLabelItem Caption = 'Precio punto actual' end end object edtPrecioPunto: TcxDBCurrencyEdit Left = 866 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 = 948 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 = 283 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