object frFacturaCliente: TfrFacturaCliente Left = 0 Top = 0 Width = 862 Height = 643 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 = entFacturaCliente BarraSalir = brSalir BarraOperacion = brGuardar object brSalir: TRdxBarraInferior Left = 0 Top = 543 Width = 862 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = clBtnFace ColorShadow = clBtnFace Align = alBottom TabOrder = 1 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 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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.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 = 593 Width = 862 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = clBtnFace ColorShadow = clBtnFace Align = alBottom TabOrder = 2 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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.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 = 0 Width = 862 Height = 543 HorzScrollBar.Smooth = True HorzScrollBar.Style = ssFlat VertScrollBar.Smooth = True VertScrollBar.Style = ssFlat Align = alClient BevelOuter = bvNone Caption = 'pnlScroll' ParentColor = True TabOrder = 0 object Titulo: TRdxPanelTituloOperacion Left = 0 Top = 0 Width = 862 Height = 22 Caption = ' factura de cliente' Color = 11461094 Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = 2323077 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] end object pnlFactura: TRdxPanel Tag = 1 Left = 0 Top = 22 Width = 862 Height = 171 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 = 862 Height = 30 Cursor = crHandPoint Caption = 'Datos de la factura' Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = 2323077 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] Margen = 10 end object eFormaPago: TLabel Left = 70 Top = 104 Width = 76 Height = 13 Alignment = taRightJustify Caption = 'Forma de pago:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eCuentaBancaria: TLabel Left = 39 Top = 129 Width = 107 Height = 13 Alignment = taRightJustify Caption = 'Domiciliación bancaria:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eCodigo: TLabel Left = 45 Top = 56 Width = 101 Height = 13 Alignment = taRightJustify Caption = 'Código de la factura:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 92 Top = 79 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 Label8: TLabel Left = 303 Top = 79 Width = 61 Height = 13 Alignment = taRightJustify Caption = 'Vencimiento:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eEstadoFactura: TLabel Left = 317 Top = 154 Width = 47 Height = 13 Alignment = taRightJustify Caption = 'Situación:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eRealizadoPor: TLabel Left = 106 Top = 154 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 = 52 Width = 110 Height = 19 VerBoton = True AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 ColorBoton = 12775679 DataField = 'CODIGO' DataSource = dsFactura TabOrder = 0 Text = 'Codigo' OnExit = CodigoExit OnButtonClick = CodigoButtonClick end object Situacion: TRdxDBComboBox Left = 371 Top = 150 Width = 110 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 = 9 Text = 'Situacion' ItemIndex = -1 DataField = 'SITUACION' DataSource = dsFactura end object Usuario: TRdxDBEdit Left = 154 Top = 150 Width = 110 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 DataField = 'USUARIO' DataSource = dsFactura ReadOnly = True TabOrder = 7 Text = 'Usuario' Visible = False end object FormaPago: TRdxDBComboBox Left = 154 Top = 100 Width = 327 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 = 'FormaPago' ItemIndex = -1 DataField = 'FORMAPAGO' DataSource = dsFactura end object CuentaBancaria: TRdxDBComboBox Left = 154 Top = 125 Width = 327 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 = 5 Text = 'CuentaBancaria' ItemIndex = -1 DataField = 'BANCO' DataSource = dsFactura end object pnlPresupuesto: TPanel Left = 497 Top = 48 Width = 409 Height = 21 BevelOuter = bvNone ParentColor = True TabOrder = 4 Visible = False object Label7: TLabel Left = 1 Top = 4 Width = 90 Height = 13 Alignment = taRightJustify Caption = 'Cód. presupuesto:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 226 Top = 4 Width = 151 Height = 13 Caption = 'FACTURA DE PRESUPUESTO' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object CodPresupuesto: TRdxDBEdit Left = 98 Top = 1 Width = 110 Height = 19 TabStop = False AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 DataField = 'CODIGOPRESUPUESTOALBARAN' DataSource = dsFactura ReadOnly = True TabOrder = 0 Text = 'CodPresupuesto' end end object pnlAlbaran: TPanel Left = 498 Top = 80 Width = 409 Height = 21 BevelOuter = bvNone ParentColor = True TabOrder = 6 Visible = False object Label10: TLabel Left = 25 Top = 4 Width = 66 Height = 13 Alignment = taRightJustify Caption = 'Cód. albarán:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 226 Top = 4 Width = 124 Height = 13 Caption = 'FACTURA DE ALBARÁN' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object CodAlbaran: TRdxDBEdit Left = 98 Top = 1 Width = 110 Height = 19 TabStop = False AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 DataField = 'CODIGOPRESUPUESTOALBARAN' DataSource = dsFactura ReadOnly = True TabOrder = 0 Text = 'CodAlbaran' end end object pnlAbono: TPanel Left = 498 Top = 112 Width = 409 Height = 21 BevelOuter = bvNone ParentColor = True TabOrder = 8 Visible = False object Label12: TLabel Left = 5 Top = 4 Width = 86 Height = 13 Alignment = taRightJustify Caption = 'Factura de cargo:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label13: TLabel Left = 226 Top = 4 Width = 110 Height = 13 Caption = 'FACTURA DE ABONO' Font.Charset = DEFAULT_CHARSET Font.Color = clRed Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object CodFacturaCargo: TRdxDBEdit Left = 98 Top = 1 Width = 110 Height = 19 TabStop = False AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 DataField = 'CODIGOCARGO' DataSource = dsFactura ReadOnly = True TabOrder = 0 Text = 'CodFacturaCargo' end end object FechaAlta: TcxDBDateEdit Left = 154 Top = 75 DataBinding.DataField = 'FECHAALTA' DataBinding.DataSource = dsFactura ParentFont = False Properties.DateOnError = deToday Properties.ImmediatePost = True Properties.InputKind = ikMask Style.StyleController = dmConfiguracion.cxEstiloOscuro TabOrder = 1 Width = 110 end object Vencimiento: TcxDBDateEdit Left = 371 Top = 75 DataBinding.DataField = 'FECHAVENCIMIENTO' DataBinding.DataSource = dsFactura ParentFont = False Properties.DateOnError = deToday Properties.ImmediatePost = True Properties.InputKind = ikMask Style.StyleController = dmConfiguracion.cxEstiloOscuro TabOrder = 2 Width = 110 end end object RdxPanel1: TRdxPanel Left = 0 Top = 193 Width = 862 Height = 350 Caption = ' ' BorderWidth = 15 ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 1 UseDockManager = True object Paginas: TRdxPagesControl Left = 15 Top = 15 Width = 832 Height = 320 ActivePage = pagContenido 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 = 'Cliente' object pnlCliente: TRdxPanel Left = 0 Top = 0 Width = 824 Height = 185 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop TabOrder = 0 TabStop = True UseDockManager = True object eCodigoCliente: TLabel Left = 41 Top = 24 Width = 86 Height = 13 Alignment = taRightJustify Caption = 'Código de cliente:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eNIFCIF: TLabel Left = 269 Top = 24 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 = 86 Top = 51 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 = 100 Top = 78 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 = 463 Top = 78 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 = 549 Top = 78 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 = 78 Top = 131 Width = 49 Height = 13 Alignment = taRightJustify Caption = 'Población:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eCodigoPostal: TLabel Left = 458 Top = 105 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 = 80 Top = 105 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 = 24 Top = 158 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 = 463 Top = 131 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 = 457 Top = 155 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 = 325 Top = 20 Width = 110 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'NIFCIF' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 Text = 'NIF' end object Nombre: TRdxDBEdit Left = 135 Top = 47 Width = 485 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'NOMBRE' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 2 Text = 'Nombre' end object Calle: TRdxDBEdit Left = 135 Top = 74 Width = 300 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'CALLE' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 3 Text = 'Calle' end object Numero: TRdxDBEdit Left = 487 Top = 74 Width = 40 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'NUMERO' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 4 Text = 'Numero' end object Piso: TRdxDBEdit Left = 580 Top = 74 Width = 40 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'PISO' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 5 Text = 'Piso' end object Poblacion: TRdxDBEdit Left = 135 Top = 128 Width = 300 Height = 19 VerBoton = True AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'POBLACION' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 8 Text = 'Poblacion' OnButtonClick = PoblacionButtonClick end object CodigoPostal: TRdxDBEdit Left = 487 Top = 102 Width = 133 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'CODIGOPOSTAL' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 7 Text = 'CodigoPostal' end object Provincia: TRdxDBEdit Left = 135 Top = 101 Width = 300 Height = 19 VerBoton = True AutoSize = False BorderStyle = bsNone CharCase = ecUpperCase ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'PROVINCIA' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 6 Text = 'PROVINCIA' OnButtonClick = ProvinciaButtonClick end object PersonaContacto: TRdxDBEdit Left = 135 Top = 154 Width = 300 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'PERSONACONTACTO' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 10 Text = 'PersonaContacto' end object Telefono: TRdxDBEdit Left = 487 Top = 128 Width = 133 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'TELEFONO' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 9 Text = 'Telefono' end object Fax: TRdxDBEdit Left = 487 Top = 154 Width = 133 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'FAX' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 11 Text = 'Fax' end object CodCliente: TcxDBButtonEdit Left = 134 Top = 19 DataBinding.DataField = 'CODIGOCLIENTE' DataBinding.DataSource = dsFactura 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 = CodClientePropertiesButtonClick Properties.OnValidate = CodClientePropertiesValidate Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro TabOrder = 0 Width = 112 end end object RdxPanel2: TRdxPanel Left = 0 Top = 185 Width = 824 Height = 94 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop TabOrder = 1 AutoSize = True UseDockManager = True object RdxCabecera1: TRdxCabecera Left = 0 Top = 0 Width = 824 Height = 30 Caption = 'Cliente final' Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = 2323077 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] Margen = 10 end object Label2: TLabel Left = 41 Top = 52 Width = 86 Height = 13 Alignment = taRightJustify Caption = 'Código de cliente:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 86 Top = 79 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 NombreClienteFinal: TRdxDBEdit Left = 135 Top = 75 Width = 300 Height = 19 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 16383743 ColorBoton = 12775679 DataField = 'NOMBRECLIENTEFINAL' DataSource = dsFactura Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 Text = 'NombreClienteFinal' end object CodClienteFinal: TcxDBButtonEdit Left = 134 Top = 47 DataBinding.DataField = 'CODIGOCLIENTEFINAL' DataBinding.DataSource = dsFactura 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 = CodClienteFinalPropertiesButtonClick Properties.OnValidate = CodClienteFinalPropertiesValidate Style.StyleController = dmConfiguracion.cxEstiloEditoresFondoOscuro TabOrder = 0 Width = 112 end end end object pagContenido: TTabSheet Caption = 'Contenido' ImageIndex = 1 object pnlGridArticulos: TPanel Left = 0 Top = 0 Width = 824 Height = 292 Align = alClient BevelOuter = bvNone BorderWidth = 10 ParentColor = True TabOrder = 0 TabStop = True object pnlBarraGrid: TRdxPanel Left = 10 Top = 10 Width = 804 Height = 28 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 16383743 Align = alTop TabOrder = 0 UseDockManager = True object bAnadirCon: TRdxBoton Left = 96 Top = 4 Width = 98 Height = 19 Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Caption = 'Añadir concepto' 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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 0 Spacing = 0 OnClick = bAnadirConClick end object bEliminar: TRdxBoton Left = 199 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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 1 Spacing = 0 OnClick = bEliminarClick end object bEliminarTodo: TRdxBoton Left = 280 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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 2 Spacing = 0 OnClick = bEliminarTodoClick end object bAnadirCap: TRdxBoton Left = 0 Top = 4 Width = 91 Height = 19 Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Caption = 'Añadir capítulo' 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 = [] FontDisabled.Charset = DEFAULT_CHARSET FontDisabled.Color = clWindowText FontDisabled.Height = -11 FontDisabled.Name = 'MS Sans Serif' FontDisabled.Style = [] Margin = 10 ParentFont = False ParentColor = False TabStop = True TabOrder = 3 Spacing = 0 OnClick = bAnadirCapClick end end object gridDetalles: TdxDBGrid Left = 10 Top = 38 Width = 804 Height = 244 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 = dsDetallesFacturas 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, 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 = [] RowFooterColor = clInactiveBorder OnCustomDrawCell = gridDetallesCustomDrawCell OnEditing = gridDetallesEditing end end end object pagImportes: TTabSheet Caption = 'Importes' ImageIndex = 2 object pnlImporteAlbaran: TRdxPanel Left = 0 Top = 0 Width = 824 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 = dsFactura 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 = dsFactura 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 = dsFactura 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 = dsFactura 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 = dsFactura 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 = dsFactura ReadOnly = True TabOrder = 4 Text = 'ImporteIVA' end end end object pagDescripcion: TTabSheet Caption = 'Descripción' ImageIndex = 3 object RdxPanel4: TRdxPanel Left = 0 Top = 0 Width = 125 Height = 292 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alLeft TabOrder = 0 UseDockManager = True object Label3: TLabel Left = 38 Top = 10 Width = 83 Height = 26 Alignment = taRightJustify Caption = 'Descripción de la factura:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False WordWrap = True end end object RdxPanel5: TRdxPanel Left = 125 Top = 0 Width = 699 Height = 292 Caption = ' ' BorderWidth = 10 ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 1 UseDockManager = True object Descripcion: TRdxDBRichEdit Left = 10 Top = 10 Width = 679 Height = 272 ColorFocused = clWhite ColorBorder = 8623776 ColorFlat = 16383743 Align = alClient BorderStyle = bsNone Color = 16383743 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = 'Tahoma' Font.Style = [] Lines.Strings = ( 'Descripcion') ParentFont = False ScrollBars = ssVertical TabOrder = 0 WantTabs = True DataField = 'DESCRIPCION' DataSource = dsFactura end end end end end end object dsFactura: TDataSource AutoEdit = False Left = 8 Top = 72 end object dsDetallesFacturas: TDataSource AutoEdit = False Left = 8 Top = 104 end end