Foros Club Delphi - Crear Base de Datos desde codigo

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)

- - Crear Base de Datos desde codigo (https://www.clubdelphi.com/foros/showthread.php?t=14211)

Odnanref

13-09-2004 21:27:45

Crear Base de Datos desde codigo

Hola

Mi pregunta se que tiene respuesta y se que tal vez no es complicado.

El problema es que trabajo de base de datos Standard y tablas paradox pero el problema es que quiero generar una instaladora de mi programa pero no se como hacer para crear la base de datos que necesito ya que yo la creo directamente en el BDE administrador.

Quisiera que se generara o saber como poder jalar la base de datos a la instaladora.

Gracias por su tiempo.

marcoszorrilla

13-09-2004 22:42:52

Tomado de la ayuda del DatabaseDesktop:

Cita:

For example, the following statement creates a Paradox table with a PRIMARY KEY constraint on the LAST_NAME and FIRST_NAME columns:

CREATE TABLE "employee.db"
(
LAST_NAME CHAR(20),
FIRST_NAME CHAR(15),
SALARY NUMERIC(10,2),
DEPT_NO SMALLINT,
PRIMARY KEY(LAST_NAME, FIRST_NAME)

Un Saludo.

Neftali [Germán.Estévez]

14-09-2004 10:58:03

Cita:

Empezado por Odnanref

El problema es que trabajo de base de datos Standard y tablas paradox pero el problema es que quiero generar una instaladora de mi programa pero no se como hacer para crear la base de datos que necesito ya que yo la creo directamente en el BDE administrador.

Se pueden generar las tablas desde código utilizando sentencias SQL como ya te han dicho o utilizando el método Createable de TTable.
Otra opción (más rápida y sencilla) que no se si te interesa, es crear las tablas vacías (como tú las creas desde BDE Administrator) y distribuirlas vacías en el instalador junto con tu programa, de manera que la Base de Datos ya está creada y la distribuyes vacía. ¿Esta opción no te sirve?

Odnanref

14-09-2004 21:29:36

Crear el Alias desde codigo

Hola disculpen creo que no se entendio mi pregunta si uso tablas paradox y no tengo problemas con ellas pero si se dan cuenta el componente TTable necesita el campo Databasename osea el alias que creo en el BDE administrador en donde creo una base de datos de tipo standard y le especifico la carpeta en donde tengo creadas mis tablas paradox

El problema es que en la instaladora puedo jalar las tablas pero al momento de correr el programa ya instalado me marca error diciendo que desconoce el alias al que estoy llamando desde mi TTable no se si ya que claro lo que necesito espero no quitarles mucho tiempo.

Gracias por su atención.

roman

14-09-2004 21:38:20

Me parece que la pregunta que quieres hacer entonces es simplemente

¿Cómo hacer un alias del BDE por código?

Si es así entonces usa los métodos AddStandardAlias y SaveConfigFile del objeto Session para asignar el alias.

Claro que para que esto funcione debes tener ya instalado el BDE en la pc donde estás instalando la aplicación, aunque esta parte parece que ya la tienes resuelta.

// Saludos

Neftali [Germán.Estévez]

15-09-2004 10:43:49

Algo de código por si te ayuda:
By Darko Ivancevic.

Código Delphi [-]procedure CreateAlias;
const
  FDbDriver = 'PARADOX';
  SubDir = 'Data';
var
  FAlias: string;
  FAliasDir: string;
begin
  FAlias := 'aLog2000';
  Session.ConfigMode := cmPersistent;
  if not Session.IsAlias(FAlias) then
  begin
    AliasDir := ExtractFilePath(ParamStr(0)) + SubDir;
    Session.AddStandardAlias(FAlias, FAliasDir, FDbDriver);
    Session.SaveConfigFile;
  end;
end;

Tal vez éste link te pueda ser útil, aunque no estés utilizando Inno Setup.

http://www.jrsoftware.org/iskb.php?a=bde

La franja horaria es GMT +2. Ahora son las 02:19:25.