object frPropiedadesArticulo: TfrPropiedadesArticulo Left = 288 Top = 191 Width = 621 Height = 519 Color = 16383743 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = True Position = poMainFormCenter OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object eDescripcionArticulo: TLabel Left = 11 Top = 8 Width = 590 Height = 17 AutoSize = False Caption = 'Modificar las propiedades del concepto' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True WordWrap = True end object eDescripcion: TLabel Left = 13 Top = 44 Width = 58 Height = 13 Alignment = taRightJustify Caption = 'Descripci'#243'n:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object brDoble: TRdxBarraInferior Left = 0 Top = 435 Width = 613 Height = 50 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = clBtnFace Align = alBottom TabOrder = 0 UseDockManager = True Margen = 10 object bAceptar: TRdxBoton Left = 10 Top = 20 Width = 75 Height = 25 Action = actAceptar Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 GroupIndex = -1 Down = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clWindowText FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Glyph.Data = { 36040000424D3604000000000000360000002800000010000000100000000100 2000000000000004000000000000000000000000000000000000FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FAFAFA00EBEBEB00E6E6E600EBEBEB00FAFA FA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FAFAFA00DCDCDC00A8A8A80098989800A8A8A800DCDC DC00FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FAFAFA00DCDCDC007DB90C0075AC0E0075AC0E0084848400A8A8 A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FAFAFA00DCDCDC007AB40D007DB90C0084C50B007DB90C0075AC0E009494 9400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FAFA FA00DCDCDC007AB40D0071A6100084C50B0084C50B0087C90A0089CD09008484 8400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00EBEB EB007AB40D0071A6100084C50B008CD207007AB40D007DB90C0080BF0B0089CD 090094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF007AB4 0D0071A6100092DB05008CD2070075AC0E00DCDCDC0080BF0B0084C50B0089CD 090084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF006EA1 110098E6030075AC0E006EA11100DCDCDC00FAFAFA00FFFFFF0084C50B0089CD 090089CD090094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00618D 130075AC0E0065921200EBEBEB00FAFAFA00FFFFFF00FFFFFF0087C90A008CD2 070084C50B0084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF008CD2 070092DB050087C90A0094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0090D7 060092DB050084C50B0084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF0096E3040098E6030087C90A0094949400D7D7D700FAFAFA00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF0096E304009AEA020084C50B0084848400A8A8A800EBEBEB00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF009AEA020092DB050084C50B00ADADAD00EBEBEB00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF0092DB05007AB40D0092DB0500EBEBEB00FAFAFA00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00} Margin = 7 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 6 ModalResult = 1 end object bCancelar: TRdxBoton Left = 95 Top = 20 Width = 75 Height = 25 Cancel = True Action = actCancelar Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 GroupIndex = -1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clWindowText FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Glyph.Data = { 36040000424D3604000000000000360000002800000010000000100000000100 2000000000000004000000000000000000000000000000000000FFFFFF00FAFA FA00EBEBEB00E6E6E600EBEBEB00FAFAFA00FFFFFF00FFFFFF00FAFAFA00EBEB EB00EBEBEB00FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00EBEB EB00ADADAD0098989800ADADAD00EBEBEB00FFFFFF00FAFAFA00DCDCDC00A8A8 A800A8A8A800DCDCDC00FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF001B1B CB000807BE000807BE0094949400D7D7D700F5F5F500DCDCDC000505BC000505 BC0084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00393A DF005F5FF8004B4CEA0084848400A3A3A300C8C8C8001313C5006867FD006B6B FF002827D30098989800E6E6E600FFFFFF00FFFFFF00FFFFFF00FFFFFF004F4E EC006363F9006A6AFE004343E500848484001313C5005B5BF5006A6AFE006A6A FE003839DE0099999900E6E6E600FFFFFF00FFFFFF00FFFFFF00FFFFFF00393A DE005A5AF4005A5AF4006766FC004343E5005B5BF5006363F9006766FC005E5E F700201FCD00A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00393ADE005251EE005454F0005F5EF7006363F9005555F1006363F9004A4B E900201FCC00D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00393ADE004F4EEC005251EE005454F0006363F9004B4CEA00201F CD0098989800E6E6E600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF004A4BE9004242E4004A4BE9004A4BE9004B4CEA00201F CD0094949400D7D7D700FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FAFAFA004343E5003839DE004242E4004242E4004A4BE9004343 E50084848400A3A3A300DCDCDC00FAFAFA00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00EBEBEB004F4EEC002D2DD6003637DC003839DE004242E4004242 E4001B1BCB0084848400A3A3A300DCDCDC00FAFAFA00FFFFFF00FFFFFF00FFFF FF00FAFAFA003434DB003434DB002C2CD5003333DA003434DB003434DB003C3C E0004242E4001313C50084848400A8A8A800EBEBEB00FFFFFF00FFFFFF00FFFF FF00EBEBEB003434DB003333DA002222CF002827D300504FEC004242E4003434 DB003637DC003738DD001313C50099999900E6E6E600FFFFFF00FFFFFF00FFFF FF005251EE00393ADF001B1BCB003434DB003C3CE000A8A8A8002D2DD5003C3C E0003434DB004242E4001313C500ADADAD00EBEBEB00FFFFFF00FFFFFF00FFFF FF00504FEC004343E5004343E5004343E5003434DA00DCDCDC00FAFAFA002222 CE00393ADE003D3DE0002D2DD500EBEBEB00FAFAFA00FFFFFF00FFFFFF00FFFF FF00FFFFFF00504FED004B4CEA004B4CEA00EBEBEB00FAFAFA00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00} Margin = 6 ParentFont = False ParentColor = False TabStop = True TabOrder = 1 Spacing = 6 ModalResult = 2 end end object RdxPanel1: TRdxPanel Left = 8 Top = 120 Width = 596 Height = 313 BorderStyle = bsSingle Caption = ' ' BorderWidth = 1 Color = 15726583 ColorHighLight = 8623776 ColorShadow = 8623776 TabOrder = 1 UseDockManager = True object gridPropiedades: TcxGrid Left = 9 Top = 9 Width = 469 Height = 296 BevelInner = bvNone BevelKind = bkFlat BorderStyle = cxcbsNone TabOrder = 0 OnResize = gridPropiedadesResize LookAndFeel.Kind = lfFlat LookAndFeel.NativeStyle = True object gridPropiedadesDBCardView: TcxGridDBCardView NavigatorButtons.ConfirmDelete = False DataController.DataSource = dsPropiedadesArt DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> LayoutDirection = ldVertical OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Inserting = False OptionsView.CellEndEllipsis = True OptionsView.CardBorderWidth = 1 OptionsView.CardWidth = 450 OptionsView.CellAutoHeight = True OptionsView.RowCaptionAutoHeight = True OptionsView.RowCaptionEndEllipsis = True OptionsView.SeparatorColor = 15726583 OptionsView.SeparatorWidth = 1 Styles.Background = dmConfiguracion.cxBackground Styles.StyleSheet = dmConfiguracion.StyleSheetCard object gridPropiedadesDBCardViewDBCardViewRow1: TcxGridDBCardViewRow DataBinding.FieldName = 'NUMCONCEPTO' Visible = False end object gridPropiedadesDBCardViewDBCardViewRow2: TcxGridDBCardViewRow Caption = 'Propiedad' DataBinding.FieldName = 'CODIGOPROPIEDAD' PropertiesClassName = 'TcxLookupComboBoxProperties' Properties.GridMode = True Properties.ImmediatePost = True Properties.KeyFieldNames = 'CODIGO' Properties.ListColumns = < item FieldName = 'DESCRIPCION' end> Properties.ListOptions.AnsiSort = True Properties.ListOptions.GridLines = glNone Properties.ListOptions.ShowHeader = False Properties.ListSource = dsPropiedades end object gridPropiedadesDBCardViewDBCardViewRow3: TcxGridDBCardViewRow Caption = 'Valor' DataBinding.FieldName = 'VALOR' PropertiesClassName = 'TcxTextEditProperties' end end object gridPropiedadesLevel: TcxGridLevel GridView = gridPropiedadesDBCardView end end object bAnadir: TRdxBoton Left = 485 Top = 9 Width = 105 Height = 19 Action = actAnadir Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clWindowText FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 1 Spacing = 0 end object bEliminar: TRdxBoton Left = 485 Top = 34 Width = 105 Height = 19 Action = actEliminar Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clWindowText FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 2 Spacing = 0 end object bEliminarTodo: TRdxBoton Left = 485 Top = 59 Width = 105 Height = 19 Action = actEliminarTodo Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clWindowText FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 3 Spacing = 0 end end object Descripcion: TcxMemo Left = 80 Top = 40 Width = 524 Height = 73 Lines.Strings = ( 'Descripcion') ParentFont = False Properties.ScrollBars = ssVertical Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro StyleDisabled.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro StyleFocused.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro StyleHot.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro TabOrder = 2 end object TablaPropiedadesArt: TRxMemoryData FieldDefs = <> Left = 352 Top = 447 end object dsPropiedadesArt: TDataSource DataSet = TablaPropiedadesArt Left = 384 Top = 448 end object ActionList1: TActionList Left = 416 Top = 448 object actAnadir: TAction Caption = '&A'#241'adir propiedad' OnExecute = actAnadirExecute end object actEliminar: TAction Caption = '&Eliminar' OnExecute = actEliminarExecute OnUpdate = actEliminarUpdate end object actEliminarTodo: TAction Caption = 'Eliminar &todo' OnExecute = actEliminarTodoExecute OnUpdate = actEliminarTodoUpdate end object actAceptar: TAction Caption = '&Aceptar' OnExecute = actAceptarExecute end object actCancelar: TAction Caption = '&Cancelar' OnExecute = actCancelarExecute end end object TablaValores: TIBQuery BufferChunks = 1000 CachedUpdates = False SQL.Strings = ( 'select * from VALORES' 'where CODIGOPROPIEDAD = :CODIGOPROPIEDAD' 'order by DESCRIPCION') Left = 552 Top = 336 ParamData = < item DataType = ftUnknown Name = 'CODIGOPROPIEDAD' ParamType = ptUnknown end> end object TablaPropiedades: TIBQuery BufferChunks = 1000 CachedUpdates = False SQL.Strings = ( 'select * from PROPIEDADES' 'order by DESCRIPCION') Left = 520 Top = 336 end object dsPropiedades: TDataSource DataSet = TablaPropiedades Left = 520 Top = 368 end object dsValores: TDataSource DataSet = TablaValores Left = 552 Top = 368 end end