inherited frViewTotales: TfrViewTotales Width = 684 Height = 221 Align = alBottom ExplicitWidth = 451 ExplicitHeight = 221 object dxLayoutControl1: TdxLayoutControl AlignWithMargins = True Left = 0 Top = 0 Width = 684 Height = 217 Margins.Left = 0 Margins.Top = 0 Margins.Right = 0 Margins.Bottom = 0 Align = alTop ParentBackground = True TabOrder = 0 AutoContentSizes = [acsWidth, acsHeight] ExplicitWidth = 451 DesignSize = ( 684 217) object Bevel1: TBevel Left = 104 Top = 109 Width = 73 Height = 9 Shape = bsBottomLine end object Bevel3: TBevel Left = 340 Top = 28 Width = 3 Height = 122 Shape = bsRightLine end object Bevel4: TBevel Left = 452 Top = 109 Width = 192 Height = 9 Shape = bsBottomLine end object ImporteDto: TcxDBCurrencyEdit Left = 175 Top = 129 AutoSize = False DataBinding.DataField = 'IMPORTE_DESCUENTO' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 5 Height = 21 Width = 93 end object ImporteIVA: TcxDBCurrencyEdit Left = 523 Top = 55 AutoSize = False DataBinding.DataField = 'IMPORTE_IVA' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 10 Height = 21 Width = 137 end object ImporteTotal: TcxDBCurrencyEdit Left = 453 Top = 129 AutoSize = False DataBinding.DataField = 'IMPORTE_TOTAL' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -12 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clActiveCaption Style.TextStyle = [fsBold] Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 13 Height = 21 Width = 137 end object edtDescuento: TcxDBSpinEdit Left = 104 Top = 129 AutoSize = False DataBinding.DataField = 'DESCUENTO' DataBinding.DataSource = DADataSource ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.ImmediatePost = True Properties.MaxValue = 100.000000000000000000 Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.ButtonStyle = bts3D Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 4 Height = 21 Width = 65 end object edtIVA: TcxDBSpinEdit Left = 452 Top = 55 AutoSize = False DataBinding.DataField = 'IVA' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.AssignedValues.MinValue = True Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.ImmediatePost = True Properties.MaxValue = 100.000000000000000000 Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.ButtonStyle = bts3D Style.IsFontAssigned = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 9 Height = 21 Width = 65 end object ImporteBase: TcxDBCurrencyEdit Left = 452 Top = 28 AutoSize = False DataBinding.DataField = 'BASE_IMPONIBLE' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [fsBold] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 8 Height = 21 Width = 92 end object edtRE: TcxDBSpinEdit Left = 452 Top = 82 AutoSize = False DataBinding.DataField = 'RE' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.AssignedValues.EditFormat = True Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.ImmediatePost = True Properties.MaxValue = 100.000000000000000000 Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.ButtonStyle = bts3D Style.IsFontAssigned = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 11 Height = 21 Width = 65 end object ImporteRE: TcxDBCurrencyEdit Left = 523 Top = 82 AutoSize = False DataBinding.DataField = 'IMPORTE_RE' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 12 Height = 21 Width = 56 end object eImporteNeto: TcxDBCurrencyEdit Left = 104 Top = 28 AutoSize = False DataBinding.DataField = 'IMPORTE_NETO' DataBinding.DataSource = DADataSource Enabled = False ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = True Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [fsBold] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 0 Height = 21 Width = 147 end object ePorte: TcxDBCurrencyEdit Left = 104 Top = 156 AutoSize = False DataBinding.DataField = 'IMPORTE_PORTE' DataBinding.DataSource = DADataSource ParentFont = False Properties.Alignment.Horz = taRightJustify Properties.ReadOnly = False Properties.UseLeftAlignmentOnEditing = False Properties.UseThousandSeparator = True Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.Font.Charset = DEFAULT_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -11 Style.Font.Name = 'Tahoma' Style.Font.Style = [] Style.HotTrack = False Style.LookAndFeel.NativeStyle = True Style.TextColor = clWindowText Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.TextColor = clWindowText StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 6 Height = 21 Width = 147 end object eIVA: TcxDBLookupComboBox Left = 104 Top = 55 DataBinding.DataField = 'ID_TIPO_IVA' DataBinding.DataSource = DADataSource Properties.GridMode = True Properties.ImmediatePost = True Properties.KeyFieldNames = 'ID' Properties.ListColumns = < item FieldName = 'REFERENCIA' end> Properties.ListOptions.GridLines = glNone Properties.ListOptions.ShowHeader = False Properties.ListSource = dsTiposIVA Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True Style.ButtonStyle = bts3D Style.PopupBorderStyle = epbsFrame3D StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 1 Width = 81 end object bTiposIVA: TButton Left = 192 Top = 55 Width = 132 Height = 21 Caption = 'Ver los tipos de IVA...' TabOrder = 2 end object cbRecargoEquivalencia: TcxDBCheckBox Left = 104 Top = 82 Caption = 'Aplicar recargo de equivalencia' DataBinding.DataField = 'RECARGO_EQUIVALENCIA' DataBinding.DataSource = DADataSource Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Properties.ValueChecked = 1 Properties.ValueUnchecked = 0 Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.NativeStyle = True TabOrder = 3 Width = 219 end object bRecalcular: TBitBtn AlignWithMargins = True Left = 299 Top = 156 Width = 25 Height = 25 Hint = 'Recalcular' Anchors = [akLeft, akTop, akRight, akBottom] ParentShowHint = False ShowHint = True TabOrder = 7 Glyph.Data = { 36030000424D3603000000000000360000002800000010000000100000000100 1800000000000003000011170000111700000000000000000000FFFFFFFBC5AA 6947316947316947316947316947316947316947316947316947316947316947 31694731D1C6BFFFFFFFFFFFFFD89840FBC39FF46B2DF46B2DF46B2DF46B2DF4 6B2DF46B2DF46B2DF46B2DF46B2DF46B2DF46B2D694731FFFFFFFFFFFFD89840 FBC39FF8A173D88000903000F78D59D88000903000F5783E30C868006000F46B 2DF46B2D694731FFFFFFFFFFFFD89840FBC39FF9A87CF8E0B0D88000F79361F8 E0B0D88000F57F4760F89830C868F46B2DF46B2D694731FFFFFFFFFFFFD89840 FBC39FF9AE84F9A87CF8A173F79A6AF79361F78D59F68650F57F47F5783EF471 35F46B2D694731FFFFFFFFFFFFD89840FBC39FFAB58DD88000903000F8A173D8 8000903000F78D59D88000903000F5783EF46B2D694731FFFFFFFFFFFFD89840 FBC39FEFB78FF8E0B0D88000F9A87CF8E0B0D88000F79361F8E0B0D88000F57F 47F46B2D694731FFFFFFFFFFFFD89840FBC39FF6BC96EFB78FFAB58DF9AE84F9 A87CF8A173F79A6AF79361F78D59F68650F46B2D694731FFFFFFFFFFFFD89840 FBC39FFBBC96D88000903000E9B78FD88000903000F8A4774878F8000098F790 5DF46B2D694731FFFFFFFFFFFFD89840FBC39FFBBC96F8E0B0D88000F2B68EF8 E0B0D88000F9AB80D2DEFE4878F8F79766F46B2D694731FFFFFFFFFFFFD89840 FBC39FFBBC96FBBC96FBBC96F9BC96F2B68EFBB992FAB289F9AB80F8A477F79D 6EF46B2D694731FFFFFFFFFFFFD89840986060C08068C08068C08068C08068C0 8068C08068C08068C08068C08068C08068F46B2D694731FFFFFFFFFFFFD89840 986060C5F5C5C5F5C5C5F5C5C2F0C2B8E5B8AEDAAEA5D0A59CC59C98C098C080 68F46B2D694731FFFFFFFFFFFFD89840986060C5F5C5C5F5C5C5F5C5C5F5C5C5 F5C5BDEABDB3DFB3AAD6AAA1CBA1C08068F46B2D694731FFFFFFFFFFFFD89840 9860609860609860609860609860609860609860609860609860609860609860 60F79D6E694731FFFFFFFFFFFFFBC5AAD89840D89840D89840D89840D89840D8 9840D89840D89840D89840D89840D89840D89840FBC5AAFFFFFF} end object dxLayoutControl1Group_Root: TdxLayoutGroup ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Group1: TdxLayoutGroup Caption = 'Importes totales' LayoutDirection = ldHorizontal object dxLayoutControl1Group2: TdxLayoutGroup AutoAligns = [aaVertical] AlignHorz = ahClient ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Item8: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Importe neto:' Control = eImporteNeto ControlOptions.ShowBorder = False end object dxLayoutControl1Group6: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item11: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Tipo de IVA:' Control = eIVA ControlOptions.ShowBorder = False end object dxLayoutControl1Item15: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahRight ShowCaption = False Control = bTiposIVA ControlOptions.ShowBorder = False end end object dxLayoutControl1Item16: TdxLayoutItem Caption = ' ' Control = cbRecargoEquivalencia ControlOptions.ShowBorder = False end object dxLayoutControl1Item10: TdxLayoutItem Caption = ' ' Control = Bevel1 ControlOptions.ShowBorder = False end object dxLayoutControl1Group7: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item4: TdxLayoutItem AutoAligns = [aaVertical] Caption = 'Descuento (%):' Control = edtDescuento ControlOptions.ShowBorder = False end object dxLayoutControl1Item1: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Importe de dto:' ShowCaption = False Control = ImporteDto ControlOptions.ShowBorder = False end end object dxLayoutControl1Group10: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item9: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Porte:' Control = ePorte ControlOptions.ShowBorder = False end object dxLayoutControl1Item17: TdxLayoutItem Caption = 'BitBtn1' ShowCaption = False Control = bRecalcular ControlOptions.ShowBorder = False end end end object dxLayoutControl1Group5: TdxLayoutGroup AutoAligns = [aaVertical] AlignHorz = ahClient ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item13: TdxLayoutItem AutoAligns = [aaHorizontal] AlignVert = avClient Caption = ' ' Offsets.Left = 10 Offsets.Right = 10 ShowCaption = False Control = Bevel3 ControlOptions.ShowBorder = False end object dxLayoutControl1Group3: TdxLayoutGroup AutoAligns = [aaVertical] AlignHorz = ahClient ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Item12: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Base imponible:' Control = ImporteBase ControlOptions.ShowBorder = False end object dxLayoutControl1Group9: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item5: TdxLayoutItem AutoAligns = [aaVertical] Caption = 'IVA (%):' CaptionOptions.AlignHorz = taRightJustify Control = edtIVA ControlOptions.ShowBorder = False end object dxLayoutControl1Item2: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Importe de IVA:' ShowCaption = False Control = ImporteIVA ControlOptions.ShowBorder = False end end object dxLayoutControl1Group8: TdxLayoutGroup ShowCaption = False Hidden = True LayoutDirection = ldHorizontal ShowBorder = False object dxLayoutControl1Item6: TdxLayoutItem AutoAligns = [aaVertical] Caption = 'RE. (%):' CaptionOptions.AlignHorz = taRightJustify Control = edtRE ControlOptions.ShowBorder = False end object dxLayoutControl1Item7: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Importe de RE:' ShowCaption = False Visible = False Control = ImporteRE ControlOptions.ShowBorder = False end end object dxLayoutControl1Item14: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = ' ' Control = Bevel4 ControlOptions.ShowBorder = False end object dxLayoutControl1Item3: TdxLayoutItem AutoAligns = [aaVertical] AlignHorz = ahClient Caption = 'Importe total:' LookAndFeel = LookAndFeelIMPORTE_TOTAL Control = ImporteTotal ControlOptions.ShowBorder = False end end end end end object dxLayoutControl1Group4: TdxLayoutGroup end end object DADataSource: TDADataSource Left = 8 Top = 8 end object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList Left = 40 Top = 8 object LookAndFeelIMPORTE_TOTAL: TdxLayoutStandardLookAndFeel ItemOptions.CaptionOptions.Font.Charset = DEFAULT_CHARSET ItemOptions.CaptionOptions.Font.Color = clWindowText ItemOptions.CaptionOptions.Font.Height = -12 ItemOptions.CaptionOptions.Font.Name = 'Tahoma' ItemOptions.CaptionOptions.Font.Style = [fsBold] ItemOptions.CaptionOptions.UseDefaultFont = False end end object dsTiposIVA: TDADataSource Left = 8 Top = 40 end end