object frFacturasProveedores: TfrFacturasProveedores Left = 0 Top = 0 Width = 766 Height = 438 Color = 16383743 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 0 Entidad = entFacturaProveedor BarraSeleccion = brSeleccion BarraSalir = brSimple object BarraFacturas: TRdxBarraSuperior Left = 0 Top = 0 Width = 766 Height = 25 Caption = 'Factura de proveedor' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -19 Font.Name = 'Tahoma' Font.Style = [fsBold] Color = 2038370 ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop Alignment = taRightJustify TabOrder = 0 UseDockManager = True Margen = 5 object imgSombra: TImage Left = 0 Top = 0 Width = 766 Height = 8 Align = alTop end object bAnadir: TRdxBotonSuperior Left = 5 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 5656250 ColorDown = 5656250 ColorBorder = 5656250 ColorHighLight = 12368878 ColorShadow = 12368878 Caption = 'Añadir' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2038370 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] Margin = 5 ParentFont = False TabOrder = 0 Spacing = 6 OnClick = bAnadirClick end object bModificar: TRdxBotonSuperior Left = 75 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 5656250 ColorDown = 5656250 ColorBorder = 5656250 ColorHighLight = 12368878 ColorShadow = 12368878 Caption = 'Modificar' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2038370 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] Margin = 5 ParentFont = False TabOrder = 1 Spacing = 6 OnClick = bModificarClick end object bEliminar: TRdxBotonSuperior Left = 145 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 5656250 ColorDown = 5656250 ColorBorder = 5656250 ColorHighLight = 12368878 ColorShadow = 12368878 Caption = 'Eliminar' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2038370 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] 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 = 5656250 ColorDown = 5656250 ColorBorder = 5656250 ColorHighLight = 12368878 ColorShadow = 12368878 Caption = 'Consultar' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2038370 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] 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 = 5656250 ColorDown = 5656250 ColorBorder = 5656250 ColorHighLight = 12368878 ColorShadow = 12368878 Caption = 'Buscar' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2038370 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] Margin = 5 ParentFont = False TabOrder = 4 Spacing = 6 OnClick = bBuscarClick end object bListar: TRdxBotonMenu Left = 355 Top = 5 Width = 65 Height = 15 Alignment = taCenter ColorFocused = 5656250 ColorDown = 5656250 ColorBorder = 5656250 ColorHighLight = 12368878 ColorShadow = 12368878 Caption = 'Listar' Font.Charset = DEFAULT_CHARSET Font.Color = 12368878 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = 2038370 FontDown.Height = -11 FontDown.Name = 'Tahoma' FontDown.Style = [fsBold] Glyph.Data = { C6010000424DC60100000000000036000000280000000A0000000A0000000100 2000000000009001000000000000000000000000000000000000FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00} Margin = 5 ParentFont = False PopupMenu = menuListar TabOrder = 5 Spacing = 0 end end object pnlCuerpo: TRdxPanel Left = 0 Top = 25 Width = 766 Height = 413 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 1 UseDockManager = True object pnlGridFacturas: TPanel Left = 0 Top = 25 Width = 766 Height = 288 Align = alClient AutoSize = True BevelOuter = bvNone BorderWidth = 10 ParentColor = True TabOrder = 0 object gridFacturas: TdxDBGrid Left = 10 Top = 10 Width = 746 Height = 268 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 = gridFacturasDblClick BandColor = 8623776 BandFont.Charset = DEFAULT_CHARSET BandFont.Color = clWindowText BandFont.Height = -11 BandFont.Name = 'Tahoma' BandFont.Style = [] DataSource = dsFacturas 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 = [] OnCustomDrawCell = gridFacturasCustomDrawCell end end object brSeleccion: TRdxBarraInferior Left = 0 Top = 313 Width = 766 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = clBtnFace ColorShadow = clBtnFace Align = alBottom TabOrder = 1 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 = [] 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 = [] 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 object brSimple: TRdxBarraInferior Left = 0 Top = 363 Width = 766 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = clBtnFace ColorShadow = clBtnFace Align = alBottom TabOrder = 2 UseDockManager = True Margen = 10 object bSalir: TRdxBoton Left = 10 Top = 20 Width = 75 Height = 25 Cancel = True Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 GroupIndex = 1 Caption = 'Aceptar' 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 = [] 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 TabOrder = 0 Spacing = 6 OnClick = bSalirClick end end object pnlExtra: TRdxBarraSuperior Left = 0 Top = 0 Width = 766 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 = 3 UseDockManager = True Margen = 5 object bCambiarSituacion: TRdxBoton Left = 5 Top = 3 Width = 132 Height = 18 Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Caption = 'Cambiar situación' 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] Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000220B0000220B000010000000100000008C8CCE00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111 1111100000000000000110000000000000011001111111111001100111111111 1001111111111001111111111111011011111111111101101111111110001001 1111111100000111111111110000011111111111000001111111111110001111 1111111111111111111111111111111111111111111111111111} Margin = 5 ParentFont = False ParentColor = False TabOrder = 0 Spacing = 2 OnClick = bCambiarSituacionClick end object RdxPanel1: TRdxPanel Left = 618 Top = 1 Width = 147 Height = 23 Caption = ' ' ParentColor = True ColorHighLight = clBtnText ColorShadow = clBtnShadow Align = alRight TabOrder = 1 UseDockManager = True object Label1: TLabel Left = 14 Top = 5 Width = 23 Height = 13 Caption = 'Año:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object cbxAno: TRdxComboBox Left = 40 Top = 1 Width = 104 Height = 21 Style = csDropDownList Color = 15726583 ColorArrow = clBlack ColorArrowBackground = 12775679 ColorBorder = 8623776 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 0 ItemIndex = -1 OnChange = cbxAnoChange BiDiMode = bdLeftToRight ParentBiDiMode = False end end end end object dsFacturas: TDataSource AutoEdit = False Left = 146 Top = 131 end object menuListar: TPopupMenu2000 ShowHint = True ParentShowHint = False ParentFont = True SystemFont = False Options.Colors.Border = 2038370 Options.Colors.Bevel = 5656250 Options.Colors.BevelShadow = 5656250 Options.Colors.Menu = 2038370 Options.Colors.MenuText = 12368878 Options.Colors.Highlight = 5656250 Options.Colors.HighlightText = clBlack Options.Colors.DisabledText = clGray Options.Colors.DisabledShadow = clNone Options.Colors.Line = 5656250 Options.Colors.LineShadow = clNone Options.Colors.Frame = 12368878 Options.Colors.FrameShadow = 12368878 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 mnuListadoFacturasPendientes: TMenuItem2000 Caption = 'Listado de facturas pendientes' OnClick = mnuListadoFacturasPendientesClick end object N1: TMenuItem2000 Caption = '-' end object mnuListadoIVA: TMenuItem2000 Caption = 'Listado de IVA' OnClick = mnuListadoIVAClick end object N2: TMenuItem2000 Caption = '-' end object Listadodefacturasdeproveedor1: TMenuItem2000 Caption = 'Listado de facturas de proveedor' OnClick = Listadodefacturasdeproveedor1Click end end end