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/AlbaranProveedor.dfm

1193 lines
39 KiB
Plaintext
Raw Permalink Normal View History

object frAlbaranProveedor: TfrAlbaranProveedor
Left = 0
Top = 0
Width = 708
Height = 517
Color = 16383743
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 0
Visible = False
Entidad = entAlbaranCliente
BarraSalir = brSalir
BarraOperacion = brGuardar
object pnlTitulo: TRdxPanelTituloOperacion
Left = 0
Top = 0
Width = 708
Height = 22
Caption = ' albar<61>n de cliente'
Color = 11461094
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 2323077
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
end
object brSalir: TRdxBarraInferior
Left = 0
Top = 417
Width = 708
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
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 = {
DE000000424DDE0000000000000076000000280000000E0000000D0000000100
04000000000068000000220B0000220B000010000000100000000000000000FF
0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222022222
2200222220102222220022220110222222002220111102222200220111110222
2200201100111022220001002201102222002022222011022200222222220110
2200222222222011020022222222220110002222222222201000222222222222
0200}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bSalirClick
end
end
object brGuardar: TRdxBarraInferior
Left = 0
Top = 467
Width = 708
Height = 50
Caption = ' '
ParentColor = True
Visible = False
ColorHighLight = clBtnFace
ColorShadow = clBtnFace
Align = alBottom
TabOrder = 1
UseDockManager = True
Margen = 10
object bGuardar: 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
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 = {
DE000000424DDE0000000000000076000000280000000E0000000D0000000100
04000000000068000000220B0000220B000010000000100000000000000000FF
0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222022222
2200222220102222220022220110222222002220111102222200220111110222
2200201100111022220001002201102222002022222011022200222222220110
2200222222222011020022222222220110002222222222201000222222222222
0200}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 0
Spacing = 6
OnClick = bGuardarClick
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
Down = True
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
04000000000080000000220B0000220B0000100000001000000000009C006363
9C00C6C6C6000000CE003131CE000000FF000063FF00319CFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
2222222222222222222222022222222225222450222222222222247502222222
5222224632222225222222235022225022222222350225022222222223505022
2222222222350222222222222350302222222222350223022222223550222230
2222237502222223022221312222222223222222222222222222}
Margin = 5
ParentFont = False
ParentColor = False
TabStop = True
TabOrder = 1
Spacing = 6
OnClick = bCancelarClick
end
end
object pnlScroll: TRdxScrollPanel
Left = 0
Top = 22
Width = 708
Height = 395
HorzScrollBar.Smooth = True
HorzScrollBar.Style = ssFlat
VertScrollBar.Smooth = True
VertScrollBar.Style = ssFlat
Align = alClient
BevelOuter = bvNone
Caption = 'pnlScroll'
ParentColor = True
TabOrder = 0
object pnlAlbaran: TRdxPanel
Tag = 1
Left = 0
Top = 0
Width = 708
Height = 67
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alTop
TabOrder = 0
TabStop = True
AutoSize = True
UseDockManager = True
object cDatosAlbaran: TRdxCabecera
Left = 0
Top = 0
Width = 708
Height = 30
Cursor = crHandPoint
Caption = 'Datos del albar<61>n'
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = 2323077
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
Margen = 10
end
object eCodigo: TLabel
Left = 55
Top = 50
Width = 91
Height = 13
Alignment = taRightJustify
Caption = 'C<>digo de albar<61>n:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eFechaAlta: TLabel
Left = 282
Top = 50
Width = 54
Height = 13
Alignment = taRightJustify
Caption = 'Fecha alta:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eUsuario: TLabel
Left = 481
Top = 50
Width = 40
Height = 13
Alignment = taRightJustify
Caption = 'Usuario:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Visible = False
end
object Codigo: TRdxDBEdit
Left = 154
Top = 46
Width = 110
Height = 19
VerBoton = True
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
ColorBoton = 12775679
DataField = 'CODIGO'
DataSource = dsAlbaran
TabOrder = 0
Text = 'Codigo'
OnExit = CodigoExit
OnButtonClick = CodigoButtonClick
end
object Usuario: TRdxDBEdit
Left = 529
Top = 46
Width = 110
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 15726583
DataField = 'USUARIO'
DataSource = dsAlbaran
TabOrder = 2
Text = 'Usuario'
Visible = False
end
object FechaAlta: TcxDBDateEdit
Left = 343
Top = 46
Width = 110
Height = 21
DataBinding.DataField = 'FECHAALTA'
DataBinding.DataSource = dsAlbaran
Properties.DateOnError = deToday
Properties.ImmediatePost = True
Properties.InputKind = ikMask
Style.StyleController = dmConfiguracion.cxEstiloOscuro
TabOrder = 1
end
end
object RdxPanel1: TRdxPanel
Left = 0
Top = 67
Width = 708
Height = 328
Caption = ' '
BorderWidth = 15
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alClient
TabOrder = 1
UseDockManager = True
object Paginas: TRdxPagesControl
Left = 15
Top = 15
Width = 678
Height = 298
ActivePage = pagCliente
Align = alClient
MultiLine = True
TabOrder = 0
TabWidth = 75
Color = 15726583
ColorTab = 11461094
FontTab.Charset = DEFAULT_CHARSET
FontTab.Color = 2323077
FontTab.Height = -11
FontTab.Name = 'Tahoma'
FontTab.Style = [fsBold]
object pagCliente: TTabSheet
Caption = 'Proveedor'
object pnlCliente: TRdxPanel
Left = 16
Top = 16
Width = 625
Height = 153
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
TabOrder = 1
TabStop = True
UseDockManager = True
object eCodigoProveedor: TLabel
Left = 5
Top = 4
Width = 105
Height = 13
Alignment = taRightJustify
Caption = 'C<>digo de proveedor:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eNIFCIF: TLabel
Left = 252
Top = 4
Width = 48
Height = 13
Alignment = taRightJustify
Caption = 'NIF / CIF:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eNombre: TLabel
Left = 69
Top = 31
Width = 41
Height = 13
Alignment = taRightJustify
Caption = 'Nombre:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eDireccion: TLabel
Left = 83
Top = 58
Width = 27
Height = 13
Alignment = taRightJustify
Caption = 'Calle:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eNumero: TLabel
Left = 446
Top = 58
Width = 16
Height = 13
Alignment = taRightJustify
Caption = 'N<>:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePiso: TLabel
Left = 532
Top = 58
Width = 23
Height = 13
Alignment = taRightJustify
Caption = 'Piso:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePoblacion: TLabel
Left = 61
Top = 111
Width = 49
Height = 13
Alignment = taRightJustify
Caption = 'Poblaci<63>n:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eCodigoPostal: TLabel
Left = 441
Top = 85
Width = 21
Height = 13
Alignment = taRightJustify
Caption = 'C.P:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eProvincia: TLabel
Left = 63
Top = 85
Width = 47
Height = 13
Alignment = taRightJustify
Caption = 'Provincia:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object ePersona: TLabel
Left = 7
Top = 138
Width = 103
Height = 13
Alignment = taRightJustify
Caption = 'Persona de contacto:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eTelefono1: TLabel
Left = 446
Top = 111
Width = 16
Height = 13
Alignment = taRightJustify
Caption = 'Tlf:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eFax: TLabel
Left = 440
Top = 135
Width = 22
Height = 13
Alignment = taRightJustify
Caption = 'Fax:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object NIF: TRdxDBEdit
Left = 308
Top = 0
Width = 110
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'NIFCIF'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
Text = 'NIF'
end
object Nombre: TRdxDBEdit
Left = 118
Top = 27
Width = 300
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'NOMBRE'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 1
Text = 'Nombre'
end
object Calle: TRdxDBEdit
Left = 118
Top = 54
Width = 300
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'CALLE'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'Calle'
end
object Numero: TRdxDBEdit
Left = 470
Top = 54
Width = 40
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'NUMERO'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 3
Text = 'Numero'
end
object Piso: TRdxDBEdit
Left = 563
Top = 54
Width = 40
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'PISO'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
Text = 'Piso'
end
object Poblacion: TRdxDBEdit
Left = 118
Top = 108
Width = 300
Height = 19
VerBoton = True
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
ColorBoton = 12775679
DataField = 'POBLACION'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 7
Text = 'Poblacion'
OnButtonClick = PoblacionButtonClick
end
object CodigoPostal: TRdxDBEdit
Left = 470
Top = 81
Width = 133
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'CODIGOPOSTAL'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 6
Text = 'CodigoPostal'
end
object Provincia: TRdxDBEdit
Left = 118
Top = 81
Width = 300
Height = 19
VerBoton = True
AutoSize = False
BorderStyle = bsNone
CharCase = ecUpperCase
ColorBorder = 8623776
ColorFlat = 16383743
ColorBoton = 12775679
DataField = 'PROVINCIA'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 5
Text = 'PROVINCIA'
OnButtonClick = ProvinciaButtonClick
end
object PersonaContacto: TRdxDBEdit
Left = 118
Top = 134
Width = 300
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'PERSONACONTACTO'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 9
Text = 'PersonaContacto'
end
object Telefono: TRdxDBEdit
Left = 470
Top = 108
Width = 133
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'TELEFONO'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 8
Text = 'Telefono'
end
object Fax: TRdxDBEdit
Left = 470
Top = 134
Width = 133
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'FAX'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 10
Text = 'Fax'
end
end
object CodProveedor: TcxDBButtonEdit
Left = 134
Top = 15
Width = 112
Height = 21
DataBinding.DataField = 'CODIGOPROVEEDOR'
DataBinding.DataSource = dsAlbaran
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 = CodProveedorPropertiesButtonClick
Properties.OnValidate = CodProveedorPropertiesValidate
Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro
TabOrder = 0
end
end
object pagContenido: TTabSheet
Caption = 'Contenido'
ImageIndex = 1
object pnlGridArticulos: TPanel
Left = 0
Top = 0
Width = 670
Height = 270
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
ParentColor = True
TabOrder = 0
TabStop = True
object pnlBarraGrid: TRdxPanel
Left = 10
Top = 10
Width = 650
Height = 28
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 16383743
Align = alTop
TabOrder = 0
UseDockManager = True
object bAnadir: TRdxBoton
Left = 0
Top = 4
Width = 75
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'A<>adir'
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
OnClick = bAnadirClick
end
object bEliminar: TRdxBoton
Left = 80
Top = 4
Width = 75
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Eliminar'
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
OnClick = bEliminarClick
end
object bEliminarTodo: TRdxBoton
Left = 160
Top = 4
Width = 81
Height = 19
Alignment = taLeftJustify
Color = 14280169
ColorFocused = 12775679
ColorDown = 14280169
ColorBorder = 8623776
ColorHighLight = 8623776
ColorShadow = 8623776
Caption = 'Eliminar todo'
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 = 2
Spacing = 0
OnClick = bEliminarTodoClick
end
end
object gridDetalles: TdxDBGrid
Left = 10
Top = 38
Width = 650
Height = 222
Bands = <
item
end>
DefaultLayout = False
HeaderPanelRowCount = 1
SummaryGroups = <>
SummarySeparator = ', '
Align = alClient
Color = 16383743
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 1
BandColor = 8623776
BandFont.Charset = DEFAULT_CHARSET
BandFont.Color = clWindowText
BandFont.Height = -11
BandFont.Name = 'Tahoma'
BandFont.Style = []
DataSource = dsDetallesAlbaran
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 = [edgoAutoSearch, edgoCaseInsensitive, edgoDragScroll, 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 = []
end
end
end
object pagImportes: TTabSheet
Caption = 'Importes'
ImageIndex = 2
TabVisible = False
object pnlImporteAlbaran: TRdxPanel
Left = 0
Top = 0
Width = 670
Height = 145
Caption = ' '
ParentColor = True
ColorHighLight = 8623776
ColorShadow = 8623776
Align = alTop
TabOrder = 0
TabStop = True
UseDockManager = True
object Label4: TLabel
Left = 53
Top = 24
Width = 74
Height = 13
Alignment = taRightJustify
Caption = 'Base imponible:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object eDto: TLabel
Left = 93
Top = 52
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 eIVA: TLabel
Left = 92
Top = 80
Width = 35
Height = 13
Alignment = taRightJustify
Caption = '% IVA:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 47
Top = 120
Width = 80
Height = 13
Alignment = taRightJustify
Caption = 'Importe total:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
end
object Shape1: TShape
Left = 87
Top = 106
Width = 159
Height = 1
end
object BaseImponible: TRdxDBEdit
Left = 135
Top = 20
Width = 110
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'BASEIMPONIBLE'
DataSource = dsAlbaran
ReadOnly = True
TabOrder = 0
Text = 'BaseImponible'
end
object Descuento: TRdxDBEdit
Left = 53
Top = 48
Width = 35
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'DESCUENTO'
DataSource = dsAlbaran
TabOrder = 1
Text = 'Descuento'
end
object IVA: TRdxDBEdit
Left = 53
Top = 76
Width = 35
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'IVA'
DataSource = dsAlbaran
TabOrder = 3
Text = 'IVA'
end
object ImporteTotal: TRdxDBEdit
Left = 135
Top = 116
Width = 110
Height = 19
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'IMPORTETOTAL'
DataSource = dsAlbaran
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
Text = 'ImporteTotal'
end
object ImporteDescuento: TRdxDBEdit
Left = 135
Top = 48
Width = 110
Height = 19
TabStop = False
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'IMPORTEDESCUENTO'
DataSource = dsAlbaran
ReadOnly = True
TabOrder = 2
Text = 'ImporteDescuento'
end
object ImporteIVA: TRdxDBEdit
Left = 135
Top = 76
Width = 110
Height = 19
TabStop = False
AutoSize = False
BorderStyle = bsNone
ColorBorder = 8623776
ColorFlat = 16383743
DataField = 'IMPORTEIVA'
DataSource = dsAlbaran
ReadOnly = True
TabOrder = 4
Text = 'ImporteIVA'
end
end
end
end
end
end
object dsAlbaran: TDataSource
AutoEdit = False
Left = 656
Top = 62
end
object dsDetallesAlbaran: TDataSource
AutoEdit = False
Left = 656
Top = 94
end
end