Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)
-   -   Conectar SQLConnection a Firebird (https://www.clubdelphi.com/foros/showthread.php?t=92576)

pmtzg 27-09-2013 00:45:26

Conectar SQLConnection a Firebird
 
hola compañeros
tengo la duda de como conectar una base de datos por medio de codigo
uso Delphi XE2 y Firebird 2.5


estos son mis ejemplos

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin

SQLConnection1.DriverName := 'Firebird';
SQLConnection1.Params.Values['Database'] := 'servidor:C:\Datos\clientes\EMPRE01.FDB';
SQLConnection1.Params.Values['USER_NAME'] := 'SYSDBA';
SQLConnection1.Params.Values['PASSWORD'] := 'MASTERKEY';
SQLConnection1.LibraryName := 'dbxfb.dll';
SQLConnection1.LoginPrompt := false;
SQLConnection1.Open;
 TRY
  begin
    SQLConnection1.Connected := true;
    showmessage('conectado');
  end;
 except
    showmessage('error');
 END;
end;

o este es el correcto

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
    SQLConnection1.DriverName := 'Firebird';
    SQLConnection1.Params.Add('USER_NAME := SYSDBA');
    SQLConnection1.Params.Add('PASSWORD := MASTERKEY');
    SQLConnection1.Params.Add('Database := servidor:C:\Datos\clientes\EMPRE01.FDB');
    SQLConnection1.LibraryName := 'dbxfb.dll';
    SQLConnection1.LoginPrompt := false;
    SQLConnection1.Open;
 TRY
  begin
    SQLConnection1.Connected := true;
    showmessage('conectado');
  end;
 except
    showmessage('error');
 END;    
end;

que me falta o que estoy haciendo mal .. gracias por su tiempo

ecfisa 27-09-2013 07:25:25

Hola pmtzg.

Proba de este modo:
Código Delphi [-]
...
begin
  with SQLConnection1 do
  begin
    Params.Clear;
    Params.Add('Database=servidor:C:\Datos\clientes\EMPRE01.FDB');
    Params.Add('User_Name=sysdba');
    Params.Add('Password=masterkey');
    ConnectionName:= 'IBConnection';
    DriverName    := 'Interbase';
    GetDriverFunc := 'getSQLDriverINTERBASE';
    LibraryName   := 'dbexpint.dll';
    VendorLib     := 'gds32.dll';
    LoginPrompt   := False;
    Connected     := True;
  end;
  ...
end;

Saludos :)

pmtzg 28-09-2013 10:04:15

Para Trabajar con Firebird que es mejor DBExpress o Interbase
 
Gracias Ecfisa por tus comentarios

solo tengo una gran Duda !!!

que sera mejor para trabajar con Firebird 2.5

DbExpress o Interbase trabajando con Delphi XE2

cual da menos problemas ???
se pueden crear tablas con DbExpress y bases de datos ?, esto lo he hecho con FibPlus y con Interbase pero no se como hacerlo con DBExpress

dbexpress se me hace muy rapido trabajando con SQLDataSet, hice un equeño ejemplo y me parecio rapido

pero ahora no se si usar solo DBexpress para crear mi base de datos crear mis tablas por que no lo se como se hace y si lo hace !!!!
agregar registros, eliminar, eliminar tablas etc... todo esto repito con DBExpress

me dirijo a ustedes que son expertos en la materia para recibir su consejo

mil gracias a todos ustedes x su tiempo

pmtzg 03-10-2013 04:52:06

Pregunta para los Expertos
 
Hola Amigos de Foro, cual sera la mejor opción para trabajar una base de datos Firebird 2.5 y manejada con Delphi XE2

opción 1


para conectar -> IBDatabase
para tablas -> IBDataset
----------------> DataSetProvider
----------------> ClientDataset


Opción 2 usando DbExpress

para conectar -> SQLConnection
para tablas -> SQLDataset
----------------> DataSetProvider
----------------> ClientDataSet


yo se que los grandes Gurus como ustedes tienen mucho conocimiento de acuerdo con su experiencia

mil gracias por su tiempo .... gran Foro


La franja horaria es GMT +2. Ahora son las 13:40:30.

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