object frContratosClientes: TfrContratosClientes Left = 0 Top = 0 Width = 720 Height = 422 Color = 16383743 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 OnShow = RdxFrameContratosShow BarraSeleccion = brSeleccion BarraSalir = brSimple BarraExtra = pnlExtra object pnlCuerpo: TRdxPanel Left = 0 Top = 25 Width = 720 Height = 297 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 0 UseDockManager = True object pnlGrid: TRdxPanel Left = 0 Top = 25 Width = 720 Height = 272 Caption = ' ' BorderWidth = 10 ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 0 UseDockManager = True object gridContratos: TcxGrid Left = 10 Top = 39 Width = 700 Height = 223 Align = alClient BevelInner = bvNone BevelKind = bkFlat BorderStyle = cxcbsNone Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False PopupMenu = MenuOpciones TabOrder = 0 LookAndFeel.Kind = lfFlat LookAndFeel.NativeStyle = True object gridContratosDBTableView1: TcxGridDBTableView OnDblClick = gridContratosDBTableView1DblClick NavigatorButtons.ConfirmDelete = False FilterBox.Visible = fvNever OnCustomDrawCell = gridContratosDBTableView1CustomDrawCell DataController.DataSource = dsContratos DataController.KeyFieldNames = 'CODIGO' DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.FocusFirstCellOnNewRecord = True OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsCustomize.ColumnGrouping = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsData.Editing = False OptionsData.Inserting = False OptionsSelection.CellSelect = False OptionsView.CellEndEllipsis = True OptionsView.ColumnAutoWidth = True OptionsView.GridLineColor = 14280169 OptionsView.GridLines = glHorizontal OptionsView.GroupByBox = False OptionsView.HeaderEndEllipsis = True OptionsView.RowSeparatorColor = 14280169 Styles.StyleSheet = dmConfiguracion.StyleSheetGrid end object gridContratosLevel1: TcxGridLevel GridView = gridContratosDBTableView1 end end object Panel2: TPanel Left = 10 Top = 10 Width = 700 Height = 29 Align = alTop BevelOuter = bvNone ParentColor = True TabOrder = 1 object eNombre: TLabel Left = 0 Top = 3 Width = 36 Height = 13 Alignment = taRightJustify Caption = 'Buscar:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Buscar: TcxTextEdit Left = 39 Top = -1 AutoSize = False ParentFont = False Properties.ReadOnly = False Properties.OnChange = BuscarPropertiesChange Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro TabOrder = 0 Height = 21 Width = 258 end object bLimpiar: TRdxBoton Left = 302 Top = 0 Width = 63 Height = 19 Cancel = True Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Caption = 'Borrar' 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 = 5 ParentFont = False ParentColor = False TabStop = True TabOrder = 1 Spacing = 6 OnClick = bLimpiarClick end end end object pnlExtra: TRdxBarraSuperior Left = 0 Top = 0 Width = 720 Height = 25 Caption = ' ' BorderWidth = 1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = 'Tahoma' Font.Style = [fsBold] Color = 14280169 ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop Alignment = taRightJustify TabOrder = 1 UseDockManager = True Margen = 5 object Shape1: TShape Left = 127 Top = 4 Width = 1 Height = 17 Brush.Style = bsClear Pen.Color = 5594726 Pen.Style = psDot end object bFacturar: TRdxBoton Left = 133 Top = 3 Width = 135 Height = 19 Action = actFacturarContrato Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Font.Charset = DEFAULT_CHARSET Font.Color = 5594726 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 5594726 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000320B0000320B000010000000100000003D99A100FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111 1111100000000000000110000000000000011001111111111001100111111111 1001111111111001111111111111011011111111111101101111111110001001 1111111100000111111111110000011111111111000001111111111110001111 1111111111111111111111111111111111111111111111111111} Margin = 3 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 2 end object Panel1: TPanel Left = 480 Top = 1 Width = 239 Height = 23 Align = alRight BevelOuter = bvNone ParentColor = True TabOrder = 1 object bSeparador2: TShape Left = 9 Top = 4 Width = 1 Height = 17 Brush.Style = bsClear Pen.Color = 5594726 Pen.Style = psDot end object eFamilia: TLabel Left = 15 Top = 5 Width = 76 Height = 13 Alignment = taRightJustify Caption = 'Ver documento:' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False Transparent = True end object cbxDocumento: TcxComboBox Left = 93 Top = 1 ParentFont = False Properties.DropDownListStyle = lsFixedList Properties.ImmediatePost = True Properties.OnEditValueChanged = cbxFamiliaPropertiesEditValueChanged Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.Shadow = False Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro Style.ButtonTransparency = ebtNone Style.IsFontAssigned = True TabOrder = 0 Width = 144 end end object bRefrescar: TRdxBoton Left = 4 Top = 3 Width = 118 Height = 19 Action = actRefrescarDatos Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Font.Charset = DEFAULT_CHARSET Font.Color = 5594726 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 5594726 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E000010000000000000000084840003B1 B300FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222 2222222222222222222222222100011222222222000000012222222012222100 1222222222222210022222202222222000222200022220000000200000222200 0002000000022220002222000222222202222220012222222222222100122221 0222222210000000222222222110001222222222222222222222} Margin = 3 ParentFont = False ParentColor = False TabStop = True TabOrder = 2 Spacing = 2 end object bAnadirObra: TRdxBoton Left = 273 Top = 3 Width = 100 Height = 19 Action = actCrearObra Alignment = taLeftJustify Visible = False Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Font.Charset = DEFAULT_CHARSET Font.Color = 5594726 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 5594726 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000320B0000320B000010000000100000003D99A100FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111 1111100000000000000110000000000000011001111111111001100111111111 1001111111111001111111111111011011111111111101101111111110001001 1111111100000111111111110000011111111111000001111111111110001111 1111111111111111111111111111111111111111111111111111} Margin = 3 ParentFont = False ParentColor = False TabStop = True TabOrder = 3 Spacing = 2 end end end object pnlCabecera: TRdxBarraSuperior Left = 0 Top = 0 Width = 720 Height = 25 Caption = 'Contratos de cliente' BorderWidth = 1 Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -19 Font.Name = 'Tahoma' Font.Style = [fsBold] Color = 18299 ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop Alignment = taRightJustify TabOrder = 1 UseDockManager = True Margen = 5 object bSeparador1: TShape Left = 285 Top = 5 Width = 1 Height = 17 Brush.Style = bsClear Pen.Color = 4759522 Pen.Style = psDot end object imgSombra: TImage Left = 1 Top = 1 Width = 718 Height = 8 Align = alTop end object bAnadir: TRdxBotonMenu Left = 5 Top = 5 Width = 65 Height = 15 Alignment = taCenter Color = 18299 ColorFocused = 4759522 ColorDown = 4759522 ColorBorder = 4759522 ColorHighLight = 11590911 ColorShadow = 11590911 Caption = 'A'#241'adir' Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 18299 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Glyph.Data = { C6010000424DC60100000000000036000000280000000A0000000A0000000100 2000000000009001000000000000000000000000000000000000FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00} Layout = blGlyphRight Margin = 5 ParentFont = False ParentColor = False PopupMenu = menuAnadir TabOrder = 5 Spacing = 0 end object bModificar: TRdxBotonSuperior Left = 75 Top = 5 Width = 65 Height = 15 Action = actModificar Alignment = taCenter ColorFocused = 4759522 ColorDown = 4759522 ColorBorder = 4759522 ColorHighLight = 11590911 ColorShadow = 11590911 Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2654615 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 5 ParentFont = False TabOrder = 0 Spacing = 6 end object bEliminar: TRdxBotonSuperior Left = 145 Top = 5 Width = 65 Height = 15 Action = actEliminar Alignment = taCenter ColorFocused = 4759522 ColorDown = 4759522 ColorBorder = 4759522 ColorHighLight = 11590911 ColorShadow = 11590911 Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2654615 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 5 ParentFont = False TabOrder = 1 Spacing = 6 end object bConsultar: TRdxBotonSuperior Left = 215 Top = 5 Width = 65 Height = 15 Action = actConsultar Alignment = taCenter ColorFocused = 4759522 ColorDown = 4759522 ColorBorder = 4759522 ColorHighLight = 11590911 ColorShadow = 11590911 Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2654615 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 5 ParentFont = False TabOrder = 2 Spacing = 6 end object bImprimir: TRdxBotonSuperior Left = 291 Top = 5 Width = 65 Height = 15 Action = actImprimir Alignment = taCenter ColorFocused = 4759522 ColorDown = 4759522 ColorBorder = 4759522 ColorHighLight = 11590911 ColorShadow = 11590911 Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 18299 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 5 ParentFont = False TabOrder = 4 Spacing = 6 end object bBuscar: TRdxBotonSuperior Left = 361 Top = 5 Width = 128 Height = 15 Action = actConsultarBeneficio Alignment = taCenter ColorFocused = 4759522 ColorDown = 4759522 ColorBorder = 4759522 ColorHighLight = 11590911 ColorShadow = 11590911 Font.Charset = DEFAULT_CHARSET Font.Color = 11590911 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 18299 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 5 ParentFont = False TabOrder = 3 Spacing = 6 end end object brSeleccion: TRdxBarraInferior Left = 0 Top = 322 Width = 720 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = clBtnFace ColorShadow = clBtnFace Align = alBottom TabOrder = 2 UseDockManager = True Margen = 10 object bSeleccionar: TRdxBoton Left = 10 Top = 20 Width = 85 Height = 25 Action = actSeleccionar 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 = [] 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 = 5 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 6 end object bCancelar: TRdxBoton Left = 105 Top = 20 Width = 75 Height = 25 Cancel = True Action = actCancelar 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 = [] 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 = 5 ParentFont = False ParentColor = False TabStop = True TabOrder = 1 Spacing = 6 end end object brSimple: TRdxBarraInferior Left = 0 Top = 372 Width = 720 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = clBtnFace ColorShadow = clBtnFace Align = alBottom TabOrder = 3 UseDockManager = True Margen = 10 object bSalir: TRdxBoton Left = 10 Top = 20 Width = 75 Height = 25 Cancel = True 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 = 5 ParentFont = False ParentColor = False TabOrder = 0 Spacing = 6 end end object dsContratos: TDataSource AutoEdit = False Left = 114 Top = 159 end object MenuOpciones: TPopupMenu2000 ShowHint = True ParentShowHint = False ParentFont = True SystemFont = False Options.Colors.Border = 6052956 Options.Colors.Bevel = 14280169 Options.Colors.BevelShadow = 14280169 Options.Colors.Menu = 6052956 Options.Colors.MenuText = 15726583 Options.Colors.Highlight = 14280169 Options.Colors.HighlightText = clBlack Options.Colors.DisabledText = clGray Options.Colors.DisabledShadow = clNone Options.Colors.Line = 14280169 Options.Colors.LineShadow = clNone Options.Colors.Frame = 15726583 Options.Colors.FrameShadow = 15726583 Options.Margins.Border = 2 Options.Margins.Bevel = 1 Options.Margins.Frame = 1 Options.Title.Font.Charset = DEFAULT_CHARSET Options.Title.Font.Color = clWhite Options.Title.Font.Height = -11 Options.Title.Font.Name = 'Tahoma' Options.Title.Font.Style = [fsBold] Options.Title.ColorBegin = 5755391 Options.Title.ColorEnd = 5755391 Options.Title.Width = 20 Options.Flags = [mfNoBitmapRect] Ctl3D = False Left = 314 Top = 115 object MenuItem2: TMenuItem2000 Action = actAnadirDePresupuesto Caption = 'Contrato a partir de presupuesto' end object MenuItem20002: TMenuItem2000 Action = actModificar Caption = 'Modificar' end object Contadores: TMenuItem2000 Action = actEliminar Caption = 'Eliminar' end object MenuItem1: TMenuItem2000 Action = actConsultar Caption = 'Consultar' end object MenuItem15: TMenuItem2000 Caption = '-' end object MenuItem16: TMenuItem2000 Action = actImprimir Caption = 'Imprimir' end object MenuItem5: TMenuItem2000 Action = actCrearObra Caption = 'Crear obra' end object MenuItem11: TMenuItem2000 Action = actFacturarContrato Caption = 'Facturar contrato' end end object Acciones: TActionList Left = 192 Top = 160 object actAnadir: TAction Caption = 'Contrato normal' OnExecute = actAnadirExecute OnUpdate = actAnadirUpdate end object actAnadirCocina: TAction Caption = 'Contrato de cocina' OnExecute = actAnadirCocinaExecute OnUpdate = actAnadirUpdate end object actAnadirBano: TAction Caption = 'Contrato de ba'#241'o' OnExecute = actAnadirBanoExecute OnUpdate = actAnadirUpdate end object actAnadirArmarios: TAction Caption = 'Contrato de armarios' OnExecute = actAnadirArmariosExecute OnUpdate = actAnadirUpdate end object actAnadirElectro: TAction Caption = 'Contrato de electrodom'#233'sticos' OnExecute = actAnadirElectroExecute OnUpdate = actAnadirUpdate end object actAnadirCopia: TAction Caption = 'Copiar contrato' OnExecute = actAnadirCopiaExecute OnUpdate = actAnadirUpdate end object actAnadirDePresupuesto: TAction Caption = 'Contrato a partir de presupuesto' OnExecute = actAnadirDePresupuestoExecute OnUpdate = actAnadirUpdate end object actModificar: TAction Caption = 'Modificar' OnExecute = actModificarExecute OnUpdate = actModificarUpdate end object actEliminar: TAction Caption = 'Eliminar' OnExecute = actEliminarExecute OnUpdate = actModificarUpdate end object actRefrescarDatos: TAction Caption = 'Refrescar datos' OnExecute = actRefrescarDatosExecute end object actConsultar: TAction Caption = 'Consultar' OnExecute = actConsultarExecute OnUpdate = actModificarUpdate end object actImprimir: TAction Caption = 'Imprimir' OnExecute = actImprimirExecute OnUpdate = actModificarUpdate end object actSeleccionar: TAction Caption = 'Seleccionar' OnExecute = actSeleccionarExecute end object actCancelar: TAction Caption = 'Cancelar' OnExecute = actCancelarExecute end object actAceptar: TAction Caption = 'Aceptar' OnExecute = actAceptarExecute end object actFacturarContrato: TAction Caption = 'Facturar contrato' OnExecute = actFacturarContratoExecute OnUpdate = actModificarUpdate end object actConsultarBeneficio: TAction Caption = 'Listado de beneficio' OnExecute = actConsultarBeneficioExecute OnUpdate = actModificarUpdate end object actCrearObra: TAction Caption = 'Crear obra' OnExecute = actCrearObraExecute OnUpdate = actCrearObraUpdate end end object menuAnadir: TPopupMenu2000 ShowHint = True ParentShowHint = False ParentFont = True SystemFont = False Options.Colors.Border = 18299 Options.Colors.Bevel = 4759522 Options.Colors.BevelShadow = 4759522 Options.Colors.Menu = 18299 Options.Colors.MenuText = 13564671 Options.Colors.Highlight = 4759522 Options.Colors.HighlightText = clBlack Options.Colors.DisabledText = 4759522 Options.Colors.DisabledShadow = clNone Options.Colors.Line = 4759522 Options.Colors.LineShadow = clNone Options.Colors.Frame = 13564671 Options.Colors.FrameShadow = 13564671 Options.Margins.Border = 2 Options.Margins.Bevel = 1 Options.Margins.Frame = 1 Options.Title.Font.Charset = DEFAULT_CHARSET Options.Title.Font.Color = clWhite Options.Title.Font.Height = -11 Options.Title.Font.Name = 'Tahoma' Options.Title.Font.Style = [fsBold] Options.Title.ColorBegin = 5755391 Options.Title.ColorEnd = 5755391 Options.Title.Width = 20 Options.Flags = [mfNoBitmapRect] Ctl3D = False Left = 114 Top = 107 object MenuItem6: TMenuItem2000 Action = actAnadirDePresupuesto Caption = 'Contrato a partir de presupuesto' end object MenuItem3: TMenuItem2000 Caption = '-' end object MenuItem4: TMenuItem2000 Action = actAnadir Caption = 'Contrato normal' end object MenuItem7: TMenuItem2000 Caption = '-' end object mnNuevo: TMenuItem2000 Action = actAnadirCocina Caption = 'Contrato de cocina' end object MenuItem9: TMenuItem2000 Action = actAnadirBano Caption = 'Contrato de ba'#241'o' end object MenuItem8: TMenuItem2000 Action = actAnadirArmarios Caption = 'Contrato de armarios' end object MenuItem10: TMenuItem2000 Action = actAnadirElectro Caption = 'Contrato de electrodom'#233'sticos' end object MenuItem20004: TMenuItem2000 Caption = '-' end object mnCopiar: TMenuItem2000 Action = actAnadirCopia Caption = 'Copiar contrato' end end end