Copiar estructura Paradox ?

Coco_jac · #1 06-12-2005

Hola amigos del foro necesito saber como puedo copiar la estructura e una tabla Paradox ?

espero sus comentarios

roman · #2 06-12-2005

En el Database Desktop , cuando creas una nueva tabla, en el editor de campos aparece un botón "Borrow" que te permite tomar la estructura para la nueva tabla de otra ya existente.

Si lo quieres hacer por código, quizá puedas (no lo he probado) hacer algo como:

Código Delphi [-]Table2.FieldDefs.Assign(Table1.FieldDefs);
Table2.DatabaseName = 'alias de la base';
Table2.TableName = 'nombre de la tabla';
Table2.CreateTable;

// Saludos

Coco_jac · #3 06-12-2005

Lo probare Roman a ver como me va ?...............
Gracias..................

Coco_jac · #4 06-12-2005

Hola Roman, probe lo que me dijiste , peo sale un error : Parametro Invalido en la ultima linea.

Código:

 
table1.DatabaseName:='D:\Documents and Settings\Administrador\Escritorio\MetusaStock 05-12-05';
table1.TableName:='CLIE01.db';

Table2.FieldDefs.Assign(Table1.FieldDefs);
Table2.DatabaseName:='D:\Documents and Settings\Administrador\Escritorio\MetusaStock 05-12-05';
Table2.TableName:= 'Pruebaclie.db';
Table2.CreateTable;

roman · #5 06-12-2005

Añade un Table1.Open antes de asignar FieldDefs. Ahora ya lo probé y si funciona.

// Saludos

Coco_jac · #6 07-12-2005

Gracias Roman por l ayuda salio bien.............................