aplicacion con dbexpress

[Ana María]

Hola totote, Yo tengo BDS 2006, win Xp, dbExpress, ClientDataset y Firebird 2.1, he hecho algunas pruebas y me funciona todo muy bien.

El problema que tienes podría tratarse de que haya aplicaciones previas en algunas máquinas que podrían estar usando alguna versión distinta de dbExpress o Firebird.

Lo que yo he hecho es compilar estáticamente el proyecto, para esto he declarado en la clausula uses del proyecto "MidasLib" y "dbExpINT" ; con esto no hay necesidad de llevar dbxint30.dll ni tampoco hay necesidad de llevar y menos de registrar midasDll, y así podrán convivir pacíficamente aplicaciones que usen versiones diferentes de estas librerías.

Observa el siguiente ejemplo:

Código Delphi [-]

//Agregando librerias
program prClientDll;

uses
  Forms, MidasLib, dbExpint,
  UMain in 'UMain.pas' {Form1},.....

// Evento BeforeConnect de un TSQLConnection cuyo nombre es conexion

procedure TPruebaServidor.ConexionBeforeConnect(Sender: TObject);
var
   FileName: string;
begin
   FileName := ChangeFileExt(GetModuleName(HInstance), '.ini');//agregar //SysUtils
   if FileExists(FileName) then
      Conexion.LoadParamsFromIniFile(FileName);
end;// filename debe tener el mismo nombre que la aplicación con extensión //.ini

Con GetModuleName obtienes el nombre de la aplicación y con HInstance te aseguras de que el evento funcione así muevas el Módulo de datos a una DLL ActiveX para hacer un servidor o lo que se te antoje ( si la aplicación es multipuesto).

Ahora si se tratara de una aplicación monopuesto sería mucho mas fácil al tratarse de un Servidor Embebed yo lo conecto con tan solo esto:

Código Delphi [-]
procedure TPruebaLocal.ConexionBeforeConnect(Sender: TObject);
begin
Conexion.Params.Values['Database']  := ExtractFilePath(Application.ExeName)+'\Prueba.fdb';
end;

El resto de parámetros de la conexión los configuro en tiempo de diseño. Y solo copio las DLLs del Fierebir Embebed (que son generalmente 4 si no necesitas algo especial) mas los archivos firebird.conf y Firebird .Msg en el directorio de la aplicación renombrando FbEmbed.dll por GDS32.dll y listo.

Esto a mí me funciona bién en varias maquinas en las que he hecho las pruebas, espero te sirvan de algo.

Saludos.

[totote]

Ana maría funcionó cargar el archivo en el evento BeforeConnect del componente TSQLConnection, lo que no me funcionó fue agregar "dbExpint" en las uses del proyecto, me genera un error que no encuentra "dbExpint.dcu" alguna idea?

Gracias por la ayuda me sacaste un dolor de cabeza jeje

[Ana María]

Por fortuna ese ya es un problema menor, en BDS 2006 dbExpint.dcu está en "C:\Archivos de programa\Borland\BDS\4.0\lib" que se carga por defecto en el Tools - Options - Delphi Options- Library Win32 - libray Ptah como $(BDS)\Lib.

Intenta cambiando dbexpint al uses de cualquier otra unit del proyecto.

Recuerda que tienes que compilar sin Runtime Packages quitando la selección en Project - packages - Built with Runtime Packages.

Si no logras solucionar el problema de dbExpint.dcu quita dbexpint del uses del proyecto y copia en el directorio de la aplicación dbxint30.dll o dbxint40.dll según la versión de dbExpress que use D2007(que no se cual es, en BDS2006 es dbxint30.dll) y configura en project -Options- directories/conditional- search Path el directorio de la aplicación.

Recuerda que no necesitas registrar Midas.dll, ni llevar dbxconections.ini, ni tampoco bdxDrivers.ini en ninguno de los casos.

Saludos

[Kipow]

Seria buenisimo contar con el source code de esa dll. sera que alguna libreria de terceros tendra los fuentes para haces eso?

[pablonill]

Hola gente, el que quiera los sources del proyecto que hice que me mande un correo asi les envio y de paso lo estudiamos y podemos ver que se le puede mejorar, muchas gracias.

correo: p a b l o n i l l @ h o t m a i l . c o m

[vroa74]

buen dia
tambien me interesa los codigos del la firebird embebed + delphi
porfavor v r o a 7 4 @ g m a i l . c o m

[Casimiro Noteví]

Este hilo es de hace 5 años, de todas formas, por favor, hacer las cosas que las veamos los demás, que esto son unos foros para aprender, no un intercambio de mensajes privados por email.
No olvidar nuestra guía de estilo, gracias.