This repository has been archived on 2024-11-29. You can view files and clone it, but cannot push or open issues or pull requests.
Tecsitel_FactuGES/Proveedores/FacturasProveedores.dfm
2007-06-21 15:47:20 +00:00

698 lines
24 KiB
Plaintext

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