object frFacturaProveedor: TfrFacturaProveedor Left = 0 Top = 0 Width = 728 Height = 548 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 = entFacturaProveedor BarraSalir = brSimple BarraOperacion = brDoble object pnlTitulo: TRdxPanelTituloOperacion Left = 0 Top = 0 Width = 728 Height = 22 Caption = ' factura de proveedor' Color = 12368878 Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = 2038370 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] end object pnlScroll: TRdxScrollPanel Left = 0 Top = 22 Width = 728 Height = 426 HorzScrollBar.Smooth = True HorzScrollBar.Style = ssFlat VertScrollBar.Smooth = True VertScrollBar.Style = ssFlat Align = alClient BevelOuter = bvNone ParentColor = True TabOrder = 0 object pnlFactura: TRdxPanel Tag = 1 Left = 0 Top = 0 Width = 728 Height = 225 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alTop TabOrder = 0 AutoSize = True UseDockManager = True object cDatosFactura: TRdxCabecera Left = 0 Top = 0 Width = 728 Height = 30 Cursor = crHandPoint Caption = 'Datos de la factura' Align = alTop Font.Charset = DEFAULT_CHARSET Font.Color = 2038370 Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] Margen = 10 end object eNumFacProve: TLabel Left = 385 Top = 50 Width = 135 Height = 13 Alignment = taRightJustify Caption = 'Núm. factura de proveedor:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eCodigoFactura: TLabel Left = 56 Top = 50 Width = 90 Height = 13 Alignment = taRightJustify Caption = 'Código de factura:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eFecha: TLabel Left = 113 Top = 77 Width = 33 Height = 13 Alignment = taRightJustify Caption = 'Fecha:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eFechaVto: TLabel Left = 38 Top = 105 Width = 108 Height = 13 Alignment = taRightJustify Caption = 'Fecha de vencimiento:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eFormaPago: TLabel Left = 280 Top = 105 Width = 56 Height = 13 Alignment = taRightJustify Caption = 'F. de pago:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eTipo: TLabel Left = 496 Top = 77 Width = 24 Height = 13 Alignment = taRightJustify Caption = 'Tipo:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eBanco: TLabel Left = 39 Top = 133 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 eUsuario: TLabel Left = 480 Top = 133 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 eDescripcion: TLabel Left = 43 Top = 158 Width = 103 Height = 13 Alignment = taRightJustify Caption = 'Concepto de factura:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eSituacion: TLabel Left = 289 Top = 77 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 Notas: TRdxDBMemo Left = 154 Top = 158 Width = 485 Height = 67 ColorFocused = clWhite ColorBorder = 8623776 ColorFlat = 15726583 ParentColor = False ScrollBars = ssVertical TabOrder = 9 Lines.Strings = ( 'Notas') BorderStyle = bsNone Color = 15726583 DataField = 'NOTAS' DataSource = dsFactura end object Codigo: TRdxDBEdit Left = 154 Top = 46 Width = 110 Height = 20 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 cbxFormaPago: TRdxDBComboBox Left = 345 Top = 101 Width = 294 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 = 6 Text = 'cbxFormaPago' ItemIndex = -1 DataField = 'FORMAPAGO' DataSource = dsFactura end object cbxTipo: TRdxDBComboBox Left = 529 Top = 73 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 Items.Strings = ( 'NORMAL' 'ABONO') ParentFont = False TabOrder = 4 Text = 'cbxTipo' ItemIndex = -1 DataField = 'TIPO' DataSource = dsFactura end object CodigoFacturaProv: TRdxDBEdit Left = 529 Top = 46 Width = 110 Height = 20 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 ColorBoton = 12775679 DataField = 'CODIGOFACTURA' DataSource = dsFactura TabOrder = 1 Text = 'CodigoFacturaProv' end object Usuario: TRdxDBEdit Left = 529 Top = 129 Width = 110 Height = 20 AutoSize = False BorderStyle = bsNone ColorBorder = 8623776 ColorFlat = 15726583 DataField = 'USUARIO' DataSource = dsFactura ReadOnly = True TabOrder = 8 Text = 'Usuario' Visible = False end object cbxSituacion: TRdxDBComboBox Left = 345 Top = 74 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 = 3 Text = 'cbxSituacion' ItemIndex = -1 DataField = 'SITUACION' DataSource = dsFactura end object cbxBanco: TRdxDBComboBox Left = 154 Top = 129 Width = 303 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 = 7 Text = 'cbxBanco' ItemIndex = -1 DataField = 'BANCO' DataSource = dsFactura end object Fecha: TcxDBDateEdit Left = 154 Top = 73 Width = 110 Height = 21 DataBinding.DataField = 'FECHAALTA' DataBinding.DataSource = dsFactura Properties.DateOnError = deToday Properties.ImmediatePost = True Properties.InputKind = ikMask Style.StyleController = dmConfiguracion.cxEstiloOscuro TabOrder = 2 end object FechaVencimiento: TcxDBDateEdit Left = 154 Top = 101 Width = 110 Height = 21 DataBinding.DataField = 'FECHAVENCIMIENTO' DataBinding.DataSource = dsFactura Properties.DateOnError = deToday Properties.ImmediatePost = True Properties.InputKind = ikMask Style.StyleController = dmConfiguracion.cxEstiloOscuro TabOrder = 5 end end object pnlPaginas: TRdxPanel Left = 0 Top = 225 Width = 728 Height = 201 Caption = ' ' BorderWidth = 10 ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 1 UseDockManager = True object paginas: TRdxPagesControl Left = 10 Top = 10 Width = 708 Height = 181 ActivePage = pagProveedor Align = alClient TabOrder = 0 TabWidth = 135 Color = 15726583 ColorTab = 12368878 FontTab.Charset = DEFAULT_CHARSET FontTab.Color = 2038370 FontTab.Height = -11 FontTab.Name = 'Tahoma' FontTab.Style = [fsBold] object pagProveedor: TTabSheet Caption = 'Datos del proveedor' object pnlProveedor: TRdxPanel Left = 0 Top = 0 Width = 700 Height = 153 Caption = ' ' ParentColor = True ColorHighLight = 8623776 ColorShadow = 8623776 Align = alClient TabOrder = 0 TabStop = True UseDockManager = True object eCodigo: TLabel Left = 41 Top = 26 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 = 288 Top = 26 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 eCodigoAsignado: TLabel Left = 461 Top = 26 Width = 61 Height = 13 Alignment = taRightJustify Caption = 'Cód. cliente:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False end object eNombre: TLabel Left = 105 Top = 53 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 ePersonaContacto: TLabel Left = 43 Top = 80 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 eFax: TLabel Left = 500 Top = 80 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 NIFCIF: TRdxDBEdit Left = 344 Top = 22 Width = 110 Height = 20 AutoSize = False BorderStyle = bsNone ColorFlat = 16383743 DataField = 'NIFCIF' DataSource = dsFactura TabOrder = 1 Text = 'NIFCIF' end object CodigoCliente: TRdxDBEdit Left = 529 Top = 22 Width = 110 Height = 20 AutoSize = False BorderStyle = bsNone ColorFlat = 16383743 DataField = 'CODIGOCLIENTE' DataSource = dsFactura TabOrder = 2 Text = 'CodigoCliente' end object Nombre: TRdxDBEdit Left = 154 Top = 49 Width = 300 Height = 20 AutoSize = False BorderStyle = bsNone ColorFlat = 16383743 DataField = 'NOMBRE' DataSource = dsFactura TabOrder = 3 Text = 'Nombre' end object PersonaContacto: TRdxDBEdit Left = 154 Top = 76 Width = 300 Height = 20 AutoSize = False BorderStyle = bsNone ColorFlat = 16383743 DataField = 'PERSONACONTACTO' DataSource = dsFactura TabOrder = 4 Text = 'PersonaContacto' end object Fax: TRdxDBEdit Left = 529 Top = 76 Width = 110 Height = 20 AutoSize = False BorderStyle = bsNone ColorFlat = 16383743 DataField = 'FAX' DataSource = dsFactura TabOrder = 5 Text = 'Fax' end object CodProveedor: TcxDBButtonEdit Left = 153 Top = 21 Width = 112 Height = 21 DataBinding.DataField = 'CODIGOPROVEEDOR' DataBinding.DataSource = dsFactura 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 end object pagContenido: TTabSheet Caption = 'Lista de pedidos' ImageIndex = 1 object pnlGridArticulos: TPanel Left = 0 Top = 0 Width = 700 Height = 153 Align = alClient BevelOuter = bvNone BorderWidth = 10 ParentColor = True TabOrder = 0 TabStop = True object pnlBarraGrid: TRdxPanel Left = 10 Top = 10 Width = 680 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 = 680 Height = 105 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 = [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 pagImporte: TTabSheet Caption = 'Importe de la factura' ImageIndex = 2 object pnlImporteAlbaran: TRdxPanel Left = 0 Top = 0 Width = 700 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 ColorBoton = 12775679 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 ColorBoton = 12775679 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 ColorBoton = 12775679 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 ColorBoton = 12775679 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 ColorBoton = 12775679 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 ColorBoton = 12775679 DataField = 'IMPORTEIVA' DataSource = dsFactura ReadOnly = True TabOrder = 4 Text = 'ImporteIVA' end end end end end end object brDoble: TRdxBarraInferior Left = 0 Top = 448 Width = 728 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = 8623776 ColorShadow = 8623776 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 Caption = 'Aceptar' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack 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 Caption = 'Cancelar' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clBlack 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 = bCancelarGuardarClick end end object brSimple: TRdxBarraInferior Left = 0 Top = 498 Width = 728 Height = 50 Caption = ' ' ParentColor = True Visible = False ColorHighLight = 8623776 ColorShadow = 8623776 Align = alBottom TabOrder = 2 UseDockManager = True Margen = 10 object bSalir: TRdxBoton Left = 10 Top = 20 Width = 75 Height = 25 Cancel = True Alignment = taLeftJustify Color = 14280169 ColorFocused = 12775679 ColorDown = 14280169 ColorBorder = 8623776 ColorHighLight = 8623776 ColorShadow = 8623776 Caption = 'Aceptar' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] FontDown.Charset = DEFAULT_CHARSET FontDown.Color = clBlack 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 dsFactura: TDataSource Left = 280 Top = 32 end object dsDetallesFacturas: TDataSource Left = 312 Top = 32 end end