inherited CmpProv: TCmpProv
  Left = 388
  Top = 123
  Caption = 'Compras a Proveedores'
  PixelsPerInch = 96
  TextHeight = 16
  inherited PageControl1: TPageControl
    inherited TabSheet2: TTabSheet
      inherited Panel2: TPanel
        inherited DBMemo1: TDBMemo
          DataField = ''
          DataSource = nil
        end
        inherited cbFormaPago: TComboBox
          Sorted = False
          Items.Strings = (
            'Banco'
            'Cheque / Talon'
            'Efectivo'
            'Tarjeta')
        end
      end
    end
  end
  inherited TbVentasC: TTable
    TableName = 'Compras (cabecera).db'
    object TbVentasCCodFactura: TStringField [1]
      FieldName = 'CodFactura'
      Size = 15
    end
    inherited TbVentasCCodEmpleado: TIntegerField
      FieldName = 'CodProveedor'
    end
    inherited TbVentasCEmplNombre: TStringField
      KeyFields = 'CodProveedor'
    end
    inherited TbVentasCEmplApellidos: TStringField
      KeyFields = 'CodProveedor'
    end
    inherited TbVentasCFacturaAbierta: TSmallintField
      FieldKind = fkCalculated
      Calculated = True
    end
  end
end