object frFacturasClientes: TfrFacturasClientes Tag = 4 Left = 0 Top = 0 Width = 694 Height = 531 Color = 16383743 ParentColor = False TabOrder = 0 BarraSeleccion = brSeleccion BarraSalir = brSimple object BarraFacturas: TRdxBarraSuperior Left = 0 Top = 0 Width = 694 Height = 25 Caption = 'Factura de cliente' 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 = 694 Height = 8 Align = alTop end object bAnadir: TRdxBotonMenu Left = 5 Top = 5 Width = 65 Height = 15 Alignment = taCenter 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 = 2654615 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 = menuAnadir TabOrder = 0 Spacing = 6 end object bModificar: TRdxBotonSuperior Left = 75 Top = 5 Width = 65 Height = 15 Alignment = taCenter 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 = 2654615 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 = 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 = 2654615 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 = 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 = 2654615 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 = 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 = 2654615 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 = 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 = 2654615 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 = 694 Height = 506 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 1 UseDockManager = True object pnlGrid: TRdxPanel Left = 0 Top = 25 Width = 694 Height = 381 Caption = ' ' BorderWidth = 10 ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 0 UseDockManager = True object gridFacturas: TdxDBGrid Left = 10 Top = 10 Width = 674 Height = 361 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 = [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 pnlExtra: TRdxBarraSuperior Left = 0 Top = 0 Width = 694 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 bCambiarSituacion: TRdxBoton Left = 5 Top = 5 Width = 125 Height = 18 Hint = 'Cambiar la situación de la factura seleccionada' 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 04000000000080000000320B0000320B000010000000100000003D99A100FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00111111111111 1111100000000000000110000000000000011001111111111001100111111111 1001111111111001111111111111011011111111111101101111111110001001 1111111100000111111111110000011111111111000001111111111110001111 1111111111111111111111111111111111111111111111111111} Margin = 3 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 2 OnClick = bCambiarSituacionClick end object bImprimir: TRdxBoton Left = 135 Top = 5 Width = 77 Height = 18 Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Caption = 'Imprimir' 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 04000000000080000000220B0000220B00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF333333333FFFFFFF3FFFFFFF3 FFFFFFF3F33333F3FFFFFFF3FFFFFFF3FFFFFFF3F33333F3FFFFFFF3FFFFFFF3 FFFFFFF3F33333F3FFFFFFF3FFFFFFF3FFFFFFF333333333FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} Margin = 3 ParentFont = False ParentColor = False TabOrder = 1 Spacing = 2 OnClick = bImprimirClick end object bExportar: TRdxBoton Left = 217 Top = 5 Width = 118 Height = 18 Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Caption = 'Exportar a Word' 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 04000000000080000000320B0000320B0000100000001000000000000000FF00 0000C6C6C600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00333333333333 3333333333333333333333333333333333333330101010101333333133333333 0333333030131033133333313102012303333330301010131333333131310302 0333333010301310133333310101010103333330333333331333333101010101 0333333333333333333333333333333333333333333333333333} Margin = 3 ParentFont = False ParentColor = False TabOrder = 2 Spacing = 2 OnClick = bExportarClick end object RdxPanel1: TRdxPanel Left = 546 Top = 1 Width = 147 Height = 23 Caption = ' ' ParentColor = True ColorHighLight = clBtnText ColorShadow = clBtnShadow Align = alRight TabOrder = 3 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 object bEnviarCorreo: TRdxBoton Left = 341 Top = 5 Width = 125 Height = 18 Alignment = taLeftJustify Color = 15726583 ColorFocused = 12775679 ColorDown = 16383743 ColorBorder = 8623776 ColorHighLight = 5594726 ColorShadow = 5594726 Caption = 'Enviar por correo' 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 = { C6000000424DC60000000000000076000000280000000E0000000A0000000100 04000000000050000000130B0000130B00001000000000000000000000001010 1000009C9C0052ADC600ADE7F700FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00100000000000 0000132222222222200014244444444220001542442244242000154422442244 2000154424444244200015424444442420001524444444422000125555555555 30001111111111111100} Margin = 3 ParentFont = False ParentColor = False TabStop = True TabOrder = 4 Spacing = 5 OnClick = bEnviarCorreoClick end end object brSeleccion: TRdxBarraInferior Left = 0 Top = 456 Width = 694 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 = [] 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 = 406 Width = 694 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 Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 GroupIndex = 1 Down = True 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 end object dsFacturas: TDataSource AutoEdit = False Left = 288 Top = 120 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 = 378 Top = 67 object MenuItem20002: TMenuItem2000 Caption = 'Listado de facturas pendientes' OnClick = MenuItem20002Click end object MenuItem20004: TMenuItem2000 Caption = '-' end object MenuItem20005: TMenuItem2000 Caption = 'Listado de IVA' OnClick = MenuItem20005Click end object N1: TMenuItem2000 Caption = '-' end object Listadefacturasdecliente1: TMenuItem2000 Caption = 'Lista de facturas de cliente' OnClick = Listadefacturasdecliente1Click end end object menuAnadir: 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 = 2654615 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 = 42 Top = 83 object miFacturaLibre: TMenuItem2000 Caption = 'Factura libre' OnClick = miFacturaLibreClick end object miSep1: TMenuItem2000 Caption = '-' Visible = False end object miFacturaPre: TMenuItem2000 Caption = 'Factura de presupuesto' OnClick = miFacturaPreClick end object miSep2: TMenuItem2000 Caption = '-' Visible = False end object miFacturaAlbaran: TMenuItem2000 Caption = 'Factura de albarán' OnClick = miFacturaAlbaranClick end object miSep3: TMenuItem2000 Caption = '-' end object miAbono: TMenuItem2000 Caption = 'Abono de factura' OnClick = miAbonoClick end end end