... ¿alguien tiene algún código que me permita crear una tabla Paradox a partir de los contenidos de una matriz de datos?
En ésa matriz tengo los nombres de los campos, el tipo es el mismo para todos y la tabla será destruida completamente una vez que termine su utilidad...
Espero que sabrán perdonar mi sencillez en la petición, pero es algo que tiene AÑOS que no hago y ya se me olvidó cómo hacerlo.
[RESUELTO] Merezco que me cuelguen de las orejas, pero...
Started by
TiammatMX
, Mar 16 2011 10:45 AM
4 replies to this topic
#1
Posted 16 March 2011 - 10:45 AM
#3
Posted 16 March 2011 - 11:19 AM
Yo uso TDBF para esto http://tdbf.sourceforge.net/
Gracias, Sergio..., lo revisaré.
Añadido: Gracias por tu interés, Sergio, pero no es lo que necesito. Requiero necesariamente el código para crear una tabla Paradox. Éste componente sólo trabaja para dBase en todas sus versiones.
#4
Posted 16 March 2011 - 12:31 PM
Hola TiammatMX,
Aquí te pongo el código adaptado de una aplicación que hacía algo parecido:
Saludos
Aquí te pongo el código adaptado de una aplicación que hacía algo parecido:
delphi
var i: Integer; begin with TTable.Create(nil) do TRY DataBaseName := 'DATOS_EPA'; // Alias al que apunta la tabla TableName := 'Filtetiq'; TableType := ttParadox; for i:=0 to NElementos - 1 do // recorremos la matriz FieldDefs.Add(Matriz[i], dtString, 30, FALSE); // NombreCampo Tipo Tamaño Requerido CreateTable; FINALLY Free; // la tabla ya ha sido creada, destruimos el objeto TTable end; end; [/i]
Saludos
#5
Posted 16 March 2011 - 12:56 PM
Hola TiammatMX,
Aquí te pongo el código adaptado de una aplicación que hacía algo parecido:
delphi
var i: Integer; begin with TTable.Create(nil) do TRY DataBaseName := 'DATOS_EPA'; // Alias al que apunta la tabla TableName := 'Filtetiq'; TableType := ttParadox; for i:=0 to NElementos - 1 do // recorremos la matriz FieldDefs.Add(Matriz[i], dtString, 30, FALSE); // NombreCampo Tipo Tamaño Requerido CreateTable; FINALLY Free; // la tabla ya ha sido creada, destruimos el objeto TTable end; end; [/i]
Saludos
Gracias, Andrés..., es justo lo que necesitaba. Muy agradecido por tu participación...