| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
Carlos J. Fernandez Master


Registrado: 27 Oct 2004Mensajes: 574
|
Publicado: Mar 13 Ene, 2009 9:29 pm Asunto: Añadir campo a una Tabla Paradox |
|
|
Hola a todos,
Antes de nada felicitaros el nuevo año
Una preguntilla, alguien sabe como añadir un campo a una tabla ya existente?
Un abrazo.
Carlos |
|
| Volver arriba |
|
 |
Cesar C. Salazar Gonzalez Master


Registrado: 01 Oct 2002Mensajes: 2155Ubicación: San Cristóbal de Las Casas, Chiapas
|
Publicado: Mie 14 Ene, 2009 7:40 am Asunto: |
|
|
Existen muchas maneras de hacer esta operación, te muestro una las demas es conveniente que uses la opción buscar el foro.
Existe información relevante sobre tablas paradox.
| Código: | void __fastcall TForm1::BotonCrearClick(TObject *Sender)
{
// Establecemos el alias, que determinará
// la localización de la tabla en el disco
TablaGrupos->DatabaseName = "MIBASE";
// Facilitamos el nombre de la nueva tabla
// y su tipo
TablaGrupos->TableName = "GRUPOS.DB";
TablaGrupos->TableType = ttParadox;
// Usamos la propiedad FieldDefs para definir
// las columnas que contendrá la tabla
// Una columna con el identificador del grupo,
// que será una cadena de 10 caracteres y
// cuyo valor será requerido siempre
TablaGrupos->FieldDefs->Add("ID_GRUPO", ftString, 10, true);
// y un comentario adicional
TablaGrupos->FieldDefs->Add("Comentario", ftString, 128, false);
TIndexOptions Opciones;
Opciones << ixPrimary << ixUnique;
// Usamos la propiedad IndexDefs para definir
// los índices que nos interesen. En este caso
// un índice formado por la columna ID_GRUPO
TablaGrupos->IndexDefs->Add("IndiceGrupo", "ID_GRUPO", Opciones);
// Creamos la tabla
TablaGrupos->CreateTable();
TablaGrupos->Open(); // y la abrimos
} |
Espero que eso solucione tu problema _________________
 |
|
| Volver arriba |
|
 |
Carlos J. Fernandez Master


Registrado: 27 Oct 2004Mensajes: 574
|
Publicado: Mie 14 Ene, 2009 1:42 pm Asunto: |
|
|
Cesar,
Pero este codigo es para crear una tabla no? yo lo que quiero es añadir un campo sobre una tabla que ya existe.
Tambien vale ese codigo para hacer eso?
Un abrazo.
Carlos |
|
| Volver arriba |
|
 |
Luis Anibal Lt


Registrado: 12 Nov 2002Mensajes: 84Ubicación: Santiago del Estero, Argentina
|
Publicado: Vie 16 Ene, 2009 2:34 pm Asunto: |
|
|
Sugerencia,
miQuery->SQL->Add( "ALTER TABLE misdatos ADD campo1 INTEGER, "
" ADD campo2 SMALLINT, ADD campo3 VARCHAR(30), "
" ADD campo4 BOOLEAN " );
miQuery->ExecSQL(); _________________ Luis Anibal Mendez
Analisis, Programacion, Asesoramiento
luisanibalmendez@gmail.com |
|
| Volver arriba |
|
 |
Carlos J. Fernandez Master


Registrado: 27 Oct 2004Mensajes: 574
|
Publicado: Vie 16 Ene, 2009 3:20 pm Asunto: |
|
|
Muchas gracias,
Es justamente lo que estaba probando, lo que pasa es que mi idea era no hacerlo por una sentencia SQL, como tu pones funciona perfectamente y ademas veo que directamente parece que no se puede.
Osea que esta solucion es perfecta.
Un abrazo.
Carlos |
|
| Volver arriba |
|
 |
curruman Cdt


Registrado: 24 Mar 2008Mensajes: 9Ubicación: San Cristóbal
|
Publicado: Mar 20 Ene, 2009 8:41 pm Asunto: Si se puede |
|
|
Hola, Pues si lo que quiere es crear un campo a una tabla existente en tiempo de de diseño claro que si se puede, solamente con click derecho sobre el componente tabla, luego le da al editor de campos y ahi puede agregar un campo nuevo, también puede agregar campos calculados y campos de busqueda.
En tiempo de ejecución si tendría que hacerlo por código. Un saludo |
|
| Volver arriba |
|
 |
Carlos J. Fernandez Master


Registrado: 27 Oct 2004Mensajes: 574
|
Publicado: Mar 20 Ene, 2009 8:45 pm Asunto: |
|
|
No es en tiempo de diseño,
Es en tiempo de ejecucion
Carlos |
|
| Volver arriba |
|
 |
|