Objeto DbfTable

( TablaDbf )

Grazie soporta este tipo de archivos, proporciona acceso a tablas dBase y FoxPro. Permite la lectura, escritura y creación de tablas dBase IV. No necesita librerías o gestores de bases de datos adicionales.

Propiedades y Métodos

VALOR, VALUE, VALORCAMPOS, VCS, FIELDSVALUE, FSV 

CAMPOS, FIELDS 
        TIPO, TYPE 
        AUTOINC
        TEXTO, TEXT
        ENTERO, INTEGER
        NUMERO, NUMBER
        FECHA, DATE
        TIEMPO, TIME
        MEMO 
        BLOB 
        BOOLEAN
        TAMANO, SIZE

CREAR, CREATE 

// CreaIndice NombreIndice, Campo, Tipo
AGREGARINDICE, ADDINDEX  
        // Tipo
                PRIMARIO,PRIMARY
                UNICO,UNIQUE
                NOSENSIBLEMAYUS,CASEINSENSITIVE

TABLA, TABLE

ABRIR, OPEN 

EXCLUSIVO, EXCLUSIVE  
        VERDADERO, TRUE, V, T 
        FALSO, FALSE, F 

RUTA, PATH 

INDICE, INDEX 

ACTUALIZAR, REFRESH 

CERRAR, CLOSE 

INSERTAR, INSERT

AGREGAR, APPEND 

AGREGARREG, APPENDREC 

EDITAR, EDIT

GUARDAR, SAVE 

CANCELAR, CANCEL 

ELIMINAR, BORRAR, DELETE 

SIGUIENTE, NEXT

ANTERIOR, PRIOR 

PRIMERO, PRIMER,FIRST 

ULTIMO, LAST 

VACIAR, EMPTY

FILTRO, FILTER 

FILTRAR, FILTERED 
        VERDADERO, TRUE, V, T 
        FALSO, FALSE, F 

FILTROSENSIBLEMAYUSC, CASESENSITIVEFILTER 
        VERDADERO, TRUE, V, T 
        FALSO, FALSE, F 

IRA, GOTO 

MAESTRO, MASTER 

CAMPOSMAESTRO, MASTERFIELDS 

LIBERAR, FREE 

DESHABILITARCTRLS, DISABLECTRLS

HABILITARCTRLS, ENABLECTRLS 

REGN, RECNO  

PROPS 

//Ejemplo

Proc Ini(){

        // Inicializa el objeto para crear la tabla
        
Init Tabladbf1

        // Abre la Tabla creada
        Tabladbf1.Open
        Init form1
}

// Fomulario para ver los datos de la tabla
Obj form1 = form(){
        Title ="My form1" 
        Activate = True 
        Cont{
                Ctrl grid1 = dbGrid
                .Bounds = 10,40,900,400
                .Data = Tabladbf1
        }
        Visible = True
}

// Objeto para crear la tabla dbf
Obj Tabladbf1 = DbfTable(){
        Campos (
            Idp        : "Tipo:Entero,Tamano:0", 
            Producto   : "Tipo:Texto,Tamano:50",
            Existencias: "Tipo:Numero,Tamano:0",
            Cantidad   : "Tipo:Numero,Tamano:0",
            Precio     : "Tipo:Numero,Tamano:0",
            Costo      : "Tipo:Numero,Tamano:0",
            Importe    : "Tipo:Numero,Tamano:0"
        )
        Table = "Ejemplo.dbf"
        Crear()
}