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/Articulos/Articulo.dfm
2007-06-21 15:47:20 +00:00

1090 lines
40 KiB
Plaintext
Raw Permalink Blame History

object frArticulo: TfrArticulo
Tag = 1
Left = 0
Top = 0
Width = 871
Height = 660
Color = 16383743
ParentColor = False
TabOrder = 0
Visible = False
Entidad = entArticulo
BarraSalir = brSimple
BarraOperacion = brDoble
object Titulo: TRdxPanelTituloOperacion
Left = 0
Top = 0
Width = 871
Height = 22
Caption = ' material'
Color = 14470061
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 8934690
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
end
object brDoble: TRdxBarraInferior
Left = 0
Top = 560
Width = 871
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = 8623776
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 0
UseDockManager = True
Margen = 10
object bAceptar: 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 = 7
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bAceptarClick
end
object bCancelar: TRdxBoton
Left = 95
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 = '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 = 6
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 6
OnClick = bCancelarGuardarClick
end
end
object brSimple: TRdxBarraInferior
Left = 0
Top = 610
Width = 871
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = 8623776
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 1
UseDockManager = True
Margen = 10
object bAceptarSimple: 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
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
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bSalirClick
end
end
object pnlScroll: TRdxScrollPanel
Left = 0
Top = 22
Width = 871
Height = 538
HorzScrollBar.Smooth = True
HorzScrollBar.Style = ssFlat
VertScrollBar.Smooth = True
VertScrollBar.Style = ssFlat
Align = alClient
BevelOuter = bvNone
Caption = 'pnlScroll'
ParentColor = True
TabOrder = 2
object pnlDatos: TRdxPanel
Left = 0
Top = 0
Width = 871
Height = 173
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 0
AutoSize = True
UseDockManager = True
object eUnidades: TLabel
Left = 370
Top = 79
Width = 81
Height = 13
Alignment = taRightJustify
Caption = 'Unid. de medida:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object cDatos: TRdxCabecera
Left = 0
Top = 0
Width = 871
Height = 30
Caption = 'Datos del material'
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 8934690
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
Margen = 10
end
object eCodigo: TLabel
Left = 109
Top = 50
Width = 37
Height = 13
Alignment = taRightJustify
Caption = 'C<>digo:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eDescripcion: TLabel
Left = 88
Top = 107
Width = 58
Height = 13
Alignment = taRightJustify
Caption = 'Descripci<63>n:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eFamilia: TLabel
Left = 416
Top = 50
Width = 36
Height = 13
Alignment = taRightJustify
Caption = 'Familia:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Visible = False
end
object ePrecioEuros: TLabel
Left = 113
Top = 78
Width = 33
Height = 13
Alignment = taRightJustify
Caption = 'Precio:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eObservaciones: TLabel
Left = 71
Top = 132
Width = 75
Height = 13
Alignment = taRightJustify
Caption = 'Observaciones:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object cbxUnidadesMedida: TRdxDBComboBox
Left = 459
Top = 74
Width = 239
Height = 21
Style = csSimple
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 = 3
Text = 'cbxUnidadesMedida'
ItemIndex = -1
DataField = 'UNIDADESMEDIDA'
DataSource = dsArticulo
end
object Descripcion: TRdxDBEdit
Left = 154
Top = 103
Width = 543
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
DataField = 'DESCRIPCION'
DataSource = dsArticulo
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
Text = 'Descripcion'
end
object Precio: TRdxDBEdit
Left = 154
Top = 74
Width = 190
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
DataField = 'PRECIO'
DataSource = dsArticulo
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'Precio'
end
object cbxFamilia: TRdxDBComboBox
Left = 459
Top = 46
Width = 239
Height = 21
Style = csSimple
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 = 1
Text = 'cbxFamilia'
Visible = False
ItemIndex = -1
DataField = 'FAMILIA'
DataSource = dsArticulo
end
object Observaciones: TRdxDBMemo
Left = 154
Top = 132
Width = 543
Height = 41
ColorFocused = clWhite
ColorBorder = 8623776
ColorFlat = 15726583
ParentColor = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
ScrollBars = ssVertical
TabOrder = 5
Lines.Strings = (
'Observaciones')
BorderStyle = bsNone
Color = 15726583
DataField = 'OBSERVACIONES'
DataSource = dsArticulo
end
object Codigo: TcxDBButtonEdit
Left = 153
Top = 45
Width = 192
Height = 21
DataBinding.DataField = 'CODIGO'
DataBinding.DataSource = dsArticulo
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
16050000424D160500000000000036040000280000000E0000000E0000000100
080000000000E000000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFF0000ADADADADADADADADADADADADADFF0000ADFFF7F7FFFF
FFFFFFFFFFFFADFF0000AD9B0E2F0EFFFFFFFFFFFFFFADFF0000AD9B0E87B70E
FFFFFFFFFFFFADFF0000ADFFFF0E87B700000000FFFFADFF0000ADFFFFFF0E00
9AEAEAA452FFADFF0000ADFFFFFF009AEAF2F209A4F7ADFF0000ADFFFFFF00EA
F20909FF09F7ADFF0000ADFFFFFF00EAF209FFFF09F7ADFF0000ADFFFFFF00A4
09FFFFFFA4F7ADFF0000ADFFFFFFFF00A40909A452FFADFF0000ADFFFFFFFFFF
52525252FFFFADFF0000ADADADADADADADADADADADADADFF0000}
Kind = bkGlyph
end>
Properties.MaxLength = 10
Properties.OnButtonClick = CodigoPropertiesButtonClick
Properties.OnValidate = CodigoPropertiesValidate
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 0
end
end
object pnlFabPro: TRdxPanel
Left = 0
Top = 173
Width = 871
Height = 350
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 1
AutoSize = True
UseDockManager = True
object cFabPro: TRdxCabecera
Left = 0
Top = 0
Width = 871
Height = 30
Caption = 'Lista de fabricantes y proveedores'
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 8934690
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
Margen = 10
end
object pnlListaPrecios: TRdxPanel
Left = 0
Top = 30
Width = 871
Height = 320
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 0
UseDockManager = True
object Panel1: TPanel
Left = 0
Top = 0
Width = 871
Height = 38
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 0
object bEliminar: TRdxBoton
Left = 73
Top = 12
Width = 82
Height = 19
Action = actEliminar
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 0
end
object bEliminarTodo: TRdxBoton
Left = 160
Top = 12
Width = 82
Height = 19
Action = actEliminarTodo
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 0
end
end
object Panel2: TPanel
Left = 0
Top = 38
Width = 871
Height = 136
Align = alTop
BevelOuter = bvNone
Constraints.MaxHeight = 140
ParentColor = True
TabOrder = 1
object gridDetalles: TdxDBGrid
Left = 73
Top = 1
Width = 700
Height = 134
Bands = <
item
end>
DefaultLayout = False
HeaderPanelRowCount = 1
SummaryGroups = <>
SummarySeparator = ', '
Color = 15726583
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
BandColor = 8623776
BandFont.Charset = DEFAULT_CHARSET
BandFont.Color = clWindowText
BandFont.Height = -11
BandFont.Name = 'Tahoma'
BandFont.Style = []
DataSource = dsArticulosFabPro
DblClkExpanding = False
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 = [edgoCaseInsensitive, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoEnterThrough, edgoImmediateEditor, edgoShowHourGlass, edgoTabs, edgoTabThrough, edgoVertThrough]
OptionsCustomize = [edgoBandMoving, edgoBandSizing, edgoColumnMoving, edgoColumnSizing, edgoRowSizing]
OptionsDB = [edgoCancelOnExit, edgoSmartRefresh, edgoSyncSelection, edgoUseBookmarks]
OptionsView = [edgoAutoWidth, edgoBandHeaderWidth, edgoDrawEndEllipsis, edgoIndicator, edgoRowAutoHeight, edgoUseBitmap]
PreviewFont.Charset = DEFAULT_CHARSET
PreviewFont.Color = clBlue
PreviewFont.Height = -11
PreviewFont.Name = 'Tahoma'
PreviewFont.Style = []
Constraints.MaxHeight = 150
Constraints.MaxWidth = 700
end
end
object pnlCamposFabPro: TPanel
Left = 0
Top = 174
Width = 871
Height = 146
Align = alTop
BevelOuter = bvNone
ParentColor = True
TabOrder = 2
object grpCamposFabPro: TGroupBox
Left = 73
Top = 2
Width = 700
Height = 138
Caption = 'Nuevo proveedor'
Color = 15726583
Constraints.MaxWidth = 700
Constraints.MinWidth = 609
Font.Charset = DEFAULT_CHARSET
Font.Color = 8934690
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 0
object eFabricante: TLabel
Left = 16
Top = 28
Width = 55
Height = 13
Alignment = taRightJustify
Caption = 'Fabricante:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eProveedor: TLabel
Left = 17
Top = 56
Width = 54
Height = 13
Alignment = taRightJustify
Caption = 'Proveedor:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePrecioPro: TLabel
Left = 176
Top = 84
Width = 33
Height = 13
Alignment = taRightJustify
Caption = 'Precio:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eCodFab: TLabel
Left = 354
Top = 28
Width = 60
Height = 13
Alignment = taRightJustify
Caption = 'Codigo fab.:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eCodPro: TLabel
Left = 354
Top = 56
Width = 60
Height = 13
Alignment = taRightJustify
Caption = 'C<>digo pro.:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePrecioFinal: TLabel
Left = 558
Top = 84
Width = 56
Height = 13
Alignment = taRightJustify
Caption = 'Precio final:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eDescuento: TLabel
Left = 379
Top = 84
Width = 34
Height = 13
Alignment = taRightJustify
Caption = 'dto %:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object e2PrecioFinal: TLabel
Left = 637
Top = 84
Width = 34
Height = 13
Caption = '0,00 <20>'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 6
Top = 84
Width = 65
Height = 13
Alignment = taRightJustify
Caption = 'Fecha precio:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Fabricante: TcxLookupComboBox
Left = 75
Top = 24
Width = 256
Height = 21
ParentFont = False
Properties.KeyFieldNames = 'CODIGO'
Properties.ListColumns = <
item
FieldName = 'NOMBRE'
end>
Properties.ListOptions.ShowHeader = False
Properties.ListSource = dsFabricantes
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 0
end
object Proveedor: TcxButtonEdit
Left = 75
Top = 52
Width = 256
Height = 21
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
16050000424D160500000000000036040000280000000E0000000E0000000100
080000000000E000000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFF0000ADADADADADADADADADADADADADFF0000ADFFF7F7FFFF
FFFFFFFFFFFFADFF0000AD9B0E2F0EFFFFFFFFFFFFFFADFF0000AD9B0E87B70E
FFFFFFFFFFFFADFF0000ADFFFF0E87B700000000FFFFADFF0000ADFFFFFF0E00
9AEAEAA452FFADFF0000ADFFFFFF009AEAF2F209A4F7ADFF0000ADFFFFFF00EA
F20909FF09F7ADFF0000ADFFFFFF00EAF209FFFF09F7ADFF0000ADFFFFFF00A4
09FFFFFFA4F7ADFF0000ADFFFFFFFF00A40909A452FFADFF0000ADFFFFFFFFFF
52525252FFFFADFF0000ADADADADADADADADADADADADADFF0000}
Kind = bkGlyph
end>
Properties.MaxLength = 10
Properties.ReadOnly = True
Properties.OnButtonClick = ProveedorPropertiesButtonClick
Style.Color = 16383743
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 1
end
object PrecioPro: TcxCurrencyEdit
Left = 214
Top = 80
Width = 118
Height = 21
EditValue = 0c
ParentFont = False
Properties.MaxValue = 99999999
Style.Color = 16383743
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 2
OnExit = PrecioProExit
end
object CodFab: TcxTextEdit
Left = 417
Top = 24
Width = 256
Height = 21
ParentFont = False
Style.Color = 16383743
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 3
end
object CodPro: TcxTextEdit
Left = 417
Top = 51
Width = 256
Height = 21
ParentFont = False
Style.Color = 16383743
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 4
end
object bAgregar: TRdxBoton
Left = 613
Top = 109
Width = 60
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Agregar'
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 = []
Margin = 10
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 5
Spacing = 0
OnClick = bAgragarClick
end
object Descuento: TcxCurrencyEdit
Left = 416
Top = 80
Width = 80
Height = 21
EditValue = 0c
ParentFont = False
Properties.DisplayFormat = '0.00 %;-0.00 %'
Properties.MaxValue = 100
Style.Color = 16383743
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 6
OnExit = DescuentoExit
end
object PrecioFinal: TcxCurrencyEdit
Left = 557
Top = 101
Width = 44
Height = 21
EditValue = 0c
ParentFont = False
Properties.MaxValue = 99999999
Properties.OnChange = PrecioFinalPropertiesChange
Style.Color = 16383743
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 7
Visible = False
end
object FechaPrecio: TcxDateEdit
Left = 75
Top = 80
Width = 84
Height = 21
ParentFont = False
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoClaro
TabOrder = 8
EditValue = 0d
end
end
end
end
end
end
object dsFabricantes: TDataSource
AutoEdit = False
Left = 24
Top = 142
end
object dsArticulo: TDataSource
AutoEdit = False
Left = 24
Top = 102
end
object dsArticulosFabPro: TDataSource
Left = 24
Top = 178
end
object ActionList1: TActionList
Left = 320
Top = 237
object actEliminar: TAction
Caption = 'Eliminar'
OnExecute = actEliminarExecute
OnUpdate = actEliminarUpdate
end
object actEliminarTodo: TAction
Caption = 'Eliminar todo'
OnExecute = actEliminarTodoExecute
OnUpdate = actEliminarUpdate
end
end
end