Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   delphi 2007 paradox (https://www.clubdelphi.com/foros/showthread.php?t=71924)

vroa74 19-01-2011 02:59:59

delphi 2007 paradox
 
estoy desarrollando una aplicación por motivos practico me he topado con la necesidad de usar tablas paradox.

yo me preguntaba si hay alguna forma desde delphi crear por si solo la tabla paradox. Por si en dado caso la tabla no esta en en la ubicación, el sistema la crea y guarde la información.

necesito que la tabla contenga datos varchar o string, date y un entero llave AutoIncremental. espero que me puedan ayudar.

newtron 19-01-2011 09:57:01

Hola.

Yo no uso paradox pero si he usado tablas dbf con bde y creo que también dan la posibilidad de usar tablas de paradox. Solamente tienes que instalar el bde en la máquina en la que vayas a usar la aplicación y crear y manipular las tablas desde el programa. En la pestaña BDE del ide tienes los componentes necesarios.

Saludos

Aleca 19-01-2011 12:01:22

puedes hacerlo de esta forma.
Código Delphi [-]
procedure GeneroTabla(cName: String);
var
  NewTabla: TTable;
  NewIndexOptions: TIndexOptions;
begin
  NewTabla := TTable.Create(Application);
  NewIndexOptions := [ixPrimary];
  NewTabla.Active := False;
  NewTabla.DatabaseName := cMensPath;
  NewTabla.TableName    := cName;
  NewTabla.TableType    := ttDBase; //ttParadox
  NewTabla.FieldDefs.Clear;
  NewTabla.FieldDefs.Add('CAMPO1',      ftString,  50, False );
  NewTabla.FieldDefs.Add('CAMPO2',   ftDate,     0, False );
  NewTabla.FieldDefs.Add('Campo3', ftMemo,     0, False );
  ....
  NewTabla.IndexDefs.Create(NewTabla);
  NewTabla.IndexDefs.Clear;
  NewTabla.IndexDefs.Add('CAMPO', 'CAMPO', []);
  NewTabla.CreateTable;
  NewTabla.Destroy;
end;
Saludos :)


La franja horaria es GMT +2. Ahora son las 04:29:42.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi