GeN-OLD/Operacion/PagoIVA/Form/PagoIVAF.dfm

object PagoIVAForm: TPagoIVAForm
  Left = 0
  Top = 0
  Caption = 'Pago de IVA'
  ClientHeight = 362
  ClientWidth = 546
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 546
    Height = 65
    Align = alTop
    Color = clBlack
    ParentBackground = False
    TabOrder = 0
    object Label1: TLabel
      Left = 19
      Top = 8
      Width = 33
      Height = 13
      Caption = 'Fecha'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 78
      Top = 28
      Width = 35
      Height = 13
      Caption = 'Desde'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 232
      Top = 28
      Width = 33
      Height = 13
      Caption = 'Hasta'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object CalcularBitBtn: TBitBtn
      Left = 437
      Top = 9
      Width = 80
      Height = 50
      Caption = 'Calcular'
      DoubleBuffered = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      Kind = bkAll
      ParentDoubleBuffered = False
      ParentFont = False
      TabOrder = 0
      OnClick = CalcularBitBtnClick
    end
    object DesdeDateTimePicker: TDateTimePicker
      Left = 117
      Top = 24
      Width = 81
      Height = 21
      Date = 40324.914764351850000000
      Time = 40324.914764351850000000
      TabOrder = 1
    end
    object HastaDateTimePicker: TDateTimePicker
      Left = 269
      Top = 24
      Width = 82
      Height = 21
      Date = 40324.914837233790000000
      Time = 40324.914837233790000000
      TabOrder = 2
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 290
    Width = 546
    Height = 72
    Align = alBottom
    Color = clBlack
    ParentBackground = False
    TabOrder = 1
    object AceptarBitBtn: TBitBtn
      Left = 233
      Top = 12
      Width = 80
      Height = 50
      Caption = 'Pagar'
      DoubleBuffered = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      Kind = bkYes
      ParentDoubleBuffered = False
      ParentFont = False
      TabOrder = 0
      OnClick = AceptarBitBtnClick
    end
    object SalirBitBtn: TBitBtn
      Left = 437
      Top = 12
      Width = 80
      Height = 50
      Caption = 'Salir'
      DoubleBuffered = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      Kind = bkClose
      ParentDoubleBuffered = False
      ParentFont = False
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 65
    Width = 546
    Height = 225
    Align = alClient
    Color = clBlack
    ParentBackground = False
    TabOrder = 2
    object Label4: TLabel
      Left = 139
      Top = 41
      Width = 71
      Height = 13
      Caption = 'Debito Fiscal'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 324
      Top = 41
      Width = 75
      Height = 13
      Caption = 'Credito Fiscal'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 238
      Top = 121
      Width = 75
      Height = 13
      Caption = 'Total a Pagar'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object CreditoEdit: TEdit
      Left = 96
      Top = 60
      Width = 166
      Height = 21
      Alignment = taCenter
      TabOrder = 0
      Text = '0'
    end
    object DebitoEdit: TEdit
      Left = 277
      Top = 60
      Width = 166
      Height = 21
      Alignment = taCenter
      TabOrder = 1
      Text = '0'
    end
    object SaldoEdit: TEdit
      Left = 193
      Top = 140
      Width = 166
      Height = 21
      Alignment = taCenter
      TabOrder = 2
      Text = '0'
    end
  end
  object QTemp: TIBQuery
    Database = DM.BaseDatos
    Transaction = DM.Transaccion
    Left = 472
    Top = 88
  end
  object Q: TIBQuery
    Database = DM.BaseDatos
    Transaction = DM.Transaccion
    Left = 472
    Top = 176
  end
end