Crear o modificar Tablas Paradox desde Delphi

[Neftali [Germán.Estévez]]

Algo así debería funcionar para cambiar tamaños y demás propiedades:

Código Delphi [-]
    // Nuevo tamaño
    tbl1.FieldDefs.Find('Nombre').Size := 15;
    // Grabar cambios
    tbl1.FieldDefs.Update;

Para crear una taba y campos basta con que en la ayuda de delphi busques: TFieldDefs.AddFieldDef; Hay un ejemplo completo.

En éste capítulo también tienes información completa y ejemplos:
http://www.cesis.lv/learn/delphi/ch18.htm

Y también puedes revisar éstos dos hilos:
http://www.clubdelphi.com/foros/showthread.php?t=10123
http://www.clubdelphi.com/foros/showthread.php?t=18961

[Gabriel2]

Bien, crear tablas he podido, pero no he podido modificar las que he creado. He usado el ultimo ejemplo y no me modifica los campos. Si no fuera mucho pedir podrias enviarme el código por correo a [email protected], eternamente agradecido. Saludos...

[Neftali [Germán.Estévez]]

La otra opción es utilizar la API.
Puedes utilizar un código como éste:

Código Delphi [-]
 var
   newStruct: ChangeRec;
 begin
   ...
 
   // Lo que no quieras modificar lo dejas a 0 o vacío
   newStruct.szName := '';
   newStruct.iType := 0;
   newStruct.iSubType := 0;
   newStruct.iLength := 15;  // nuevo tamaño a  15
   newStruct.iPrecision := 0;
 
   // Debe estar con la propiedad de Exclusiva a True.
   Table1.Open;
   ChangeField(Table1, Table1Nombre, newStruct);

La función ChangeField y la definición de la estructura las puedes encontrar aquí:
http://info.borland.com/devsupport/b...structure.html

Revisa el ejemplo 3; y recuerda añadir la unit BDE al uses.