object frClientes: TfrClientes Left = 0 Top = 0 Width = 675 Height = 433 Color = 16383743 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 BarraSeleccion = brSeleccion object pnlSuperior: TRdxBarraSuperior Left = 0 Top = 0 Width = 675 Height = 25 Caption = 'Clientes' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -19 Font.Name = 'Tahoma' Font.Style = [fsBold] Color = 2323077 ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop Alignment = taRightJustify TabOrder = 0 UseDockManager = True Margen = 5 object imgSombra: TImage Left = 0 Top = 0 Width = 675 Height = 8 Align = alTop end object bAnadir: TRdxBotonSuperior Left = 5 Top = 5 Width = 65 Height = 15 Alignment = taCenter Color = 2323077 ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Aņadir' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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 ParentColor = False TabOrder = 0 Spacing = 6 OnClick = bAnadirClick end object bModificar: TRdxBotonSuperior Left = 75 Top = 5 Width = 65 Height = 15 Alignment = taCenter Color = 2323077 ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Modificar' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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 ParentColor = False TabOrder = 1 Spacing = 6 OnClick = bModificarClick end object bEliminar: TRdxBotonSuperior Left = 145 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Eliminar' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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 OnClick = bEliminarClick end object bConsultar: TRdxBotonSuperior Left = 215 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Consultar' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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 OnClick = bConsultarClick end object bBuscar: TRdxBotonSuperior Left = 285 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Buscar' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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 OnClick = bBuscarClick end object bDocumentos: TRdxBotonMenu Left = 355 Top = 5 Width = 170 Height = 15 Alignment = taCenter ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Documentos relacionados' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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} Margin = 5 ParentFont = False PopupMenu = menuDocumentos TabOrder = 5 Spacing = 0 end object bListar: TRdxBotonMenu Left = 530 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 4699085 ColorDown = 4699085 ColorBorder = 4699085 ColorHighLight = 11461094 ColorShadow = 11461094 Caption = 'Listar' Font.Charset = DEFAULT_CHARSET Font.Color = 11461094 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2323077 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} Margin = 5 ParentFont = False PopupMenu = menuListar TabOrder = 6 Spacing = 0 end end object pnlContenido: TRdxPanel Left = 0 Top = 25 Width = 675 Height = 408 Caption = ' ' ParentColor = True ColorHighLight = clBtnText ColorShadow = clBtnShadow Align = alClient TabOrder = 1 UseDockManager = True object pnlExtra: TRdxBarraSuperior Left = 0 Top = 0 Width = 675 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 = 0 UseDockManager = True Margen = 5 object bEtiquetar: TRdxBoton Left = 5 Top = 5 Width = 80 Height = 18 Hint = 'Etiquetar al proveedor para etiquetas de correspondencia' Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Caption = 'Etiquetar' 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 = { C6000000424DC60000000000000076000000280000000E0000000A0000000100 04000000000050000000130B0000130B00001000000000000000000000001010 1000009C9C0052ADC600ADE7F700FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00100000000000 0000132222222222200014244444444220001542442244242000154422442244 2000154424444244200015424444442420001524444444422000125555555555 30001111111111111100} Margin = 3 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 2 OnClick = bEtiquetarClick end end object pnlGrid: TPanel Left = 0 Top = 25 Width = 675 Height = 333 Align = alClient AutoSize = True BevelOuter = bvNone BorderWidth = 10 ParentColor = True TabOrder = 1 object gridClientes: TdxDBGrid Left = 10 Top = 10 Width = 655 Height = 313 Bands = < item end> DefaultLayout = False HeaderPanelRowCount = 1 KeyField = 'CODIGO' SummaryGroups = <> SummarySeparator = ', ' Align = alClient Color = 16383743 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 OnDblClick = gridClientesDblClick BandColor = 8623776 BandFont.Charset = DEFAULT_CHARSET BandFont.Color = clWindowText BandFont.Height = -11 BandFont.Name = 'Tahoma' BandFont.Style = [] DataSource = dsClientes Filter.FilterStatus = fsNone Filter.Criteria = {00000000} GridLineColor = 14280169 GroupPanelColor = 8623776 GroupPanelFontColor = 15726583 GroupNodeColor = 14280169 HeaderColor = 14280169 HeaderFont.Charset = DEFAULT_CHARSET HeaderFont.Color = clWindowText HeaderFont.Height = -11 HeaderFont.Name = 'Tahoma' HeaderFont.Style = [] HideFocusRect = True HideSelectionColor = 12775679 HideSelectionTextColor = clBlack HighlightColor = 12775679 HighlightTextColor = clBlack LookAndFeel = lfFlat OptionsBehavior = [edgoAutoSort, edgoCaseInsensitive, edgoDragScroll, edgoEnterShowEditor, edgoEnterThrough, edgoImmediateEditor, edgoMultiSelect, edgoMultiSort, edgoShowHourGlass, edgoTabs, edgoTabThrough, edgoVertThrough] OptionsCustomize = [edgoBandMoving, edgoBandSizing, edgoColumnMoving, edgoColumnSizing, edgoRowSizing] OptionsDB = [edgoCancelOnExit, edgoCanNavigation, edgoLoadAllRecords, edgoResetColumnFocus, edgoSmartRefresh, edgoSyncSelection, edgoUseBookmarks] OptionsView = [edgoAutoWidth, edgoBandHeaderWidth, edgoDrawEndEllipsis, edgoIndicator, edgoRowSelect, edgoUseBitmap] PreviewFont.Charset = DEFAULT_CHARSET PreviewFont.Color = clBlue PreviewFont.Height = -11 PreviewFont.Name = 'Tahoma' PreviewFont.Style = [] end end object brSeleccion: TRdxBarraInferior Left = 0 Top = 358 Width = 675 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 Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Caption = 'Seleccionar' 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 = { 06050000424D060500000000000036040000280000000E0000000D0000000100 080000000000D0000000320B0000320B000000010000000100000000000000FF 000000800000C0FFC000FF00FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000040404040404 0004040404040404000004040404040003000404040404040000040404040003 0300040404040404000004040400010101010004040404040000040400030102 0201000404040404000004000301000002010100040404040000000300000404 0002010100040404000004000404040404000201000404040000040404040404 0404000101000404000004040404040404040400010100040000040404040404 0404040400010100000004040404040404040404040001000000040404040404 04040404040400040000} Margin = 5 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 6 OnClick = bSeleccionarClick end object bCancelarGuardar: TRdxBoton Left = 105 Top = 20 Width = 75 Height = 25 Cancel = True Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Caption = 'Cancelar' 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 = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000320B0000320B0000100000001000000000009C000000 CE000000FF00FF00FF00319CFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00333333333333 3333333333333333333333033333333332333120333333333333314203333333 2333331413333332333333312033332033333333120332033333333331202033 3333333333120333333333333120103333333333120331033333331220333310 3333314203333331033330103333333331333333333333333333} Margin = 5 ParentFont = False ParentColor = False TabStop = True TabOrder = 1 Spacing = 6 OnClick = bCancelarGuardarClick end end end object menuDocumentos: TPopupMenu2000 ShowHint = True ParentShowHint = False ParentFont = True SystemFont = False Options.Colors.Border = 2654615 Options.Colors.Bevel = 5755391 Options.Colors.BevelShadow = 5755391 Options.Colors.Menu = 2654615 Options.Colors.MenuText = 13564671 Options.Colors.Highlight = 5755391 Options.Colors.HighlightText = clBlack Options.Colors.DisabledText = clGray Options.Colors.DisabledShadow = clNone Options.Colors.Line = 5755391 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 = 290 Top = 91 object Presupuestos1: TMenuItem2000 Caption = 'Presupuestos' OnClick = Presupuestos1Click end object N1: TMenuItem2000 Caption = '-' end object Albaranes1: TMenuItem2000 Caption = 'Albaranes' OnClick = Albaranes1Click end object N2: TMenuItem2000 Caption = '-' end object Facturas1: TMenuItem2000 Caption = 'Facturas' OnClick = Facturas1Click end end object dsClientes: TDataSource AutoEdit = False Left = 122 Top = 75 end object menuListar: TPopupMenu2000 ShowHint = True ParentShowHint = False ParentFont = True SystemFont = False Options.Colors.Border = 2654615 Options.Colors.Bevel = 5755391 Options.Colors.BevelShadow = 5755391 Options.Colors.Menu = 2654615 Options.Colors.MenuText = 13564671 Options.Colors.Highlight = 5755391 Options.Colors.HighlightText = clBlack Options.Colors.DisabledText = clGray Options.Colors.DisabledShadow = clNone Options.Colors.Line = 5755391 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 = 330 Top = 91 object Listadodeclientes1: TMenuItem2000 Caption = 'Listado de clientes' OnClick = Listadodeclientes1Click end object bListadoEtiquetas: TMenuItem2000 Caption = 'Etiquetas de clientes' OnClick = bListadoEtiquetasClick end end end