Ir al contenido


Foto

Firebird + Delphi Connect ==> Adiciona Tu Forma de Hacerlo


  • Por favor identifícate para responder
5 respuestas en este tema

#1 Lynn

Lynn

    Member

  • Miembros
  • PipPip
  • 11 mensajes

Escrito 03 septiembre 2010 - 08:24

Bueno A Continuacion Quisiera Saber de que forma mas se puede Conectar una Base de Datos en Firebird em Delphi por que me he dado cuenta que puede tambien poner la ruta en archivo txt o tambien con ruta encriptada me parece bueno pero nada de componentes aqui dejo mi procedimiento solo es coneccion mas o no es don DbGrid o Data Set etc solo Conectar nada mas Agradeceria Si lo Puede Poner de Forma Grafica Para Mejor Entendimiento de Todo tipo Persona Avanzandos, Profesionales, Principiantes, Curiosos, Etc

1. Muestro un Pequeño Formulario Creado
Imagen Enviada
2. Acontinuacion me Dirijo a las Paletas de InterBase y Desgloso 
Imagen Enviada
3 Agrego al Formulario el TIBDatabase
Imagen Enviada
4. y Tambien Agrego TIBTransaction
Imagen Enviada
5. Todo al Formulario
Imagen Enviada
6. Selecionamos el TIBDatabase
Imagen Enviada
7. Acemos Doble Clic y nos sale una Ventana y damos Browse
Imagen Enviada
8. Buscamos la base de datos y damos abrir
Imagen Enviada
9. incribimos el usuario y la contraseña
Imagen Enviada
10. Quitamos la Opcion de Login prompt y damos Tes  y Damos ok Si esta bien la Connecion
Imagen Enviada
11. Nos vamos a Propiedades y en la opccion Connectd  Cambiamos False Por True
Imagen Enviada
12. Seleccionamos ahora la IDTransaction1
Imagen Enviada
13. Vamos a la opcion de Propiedades y la opcion DefaultDatabase y Selecionamos IBDataBase1
Imagen Enviada
y eso Todo Quisera Saber  Su Forma de Conectar como explique direccionando la base de datos desde un TXT pero sin Componentes
  • 0

#2 Master23

Master23

    Advanced Member

  • Miembro Platino
  • PipPipPip
  • 230 mensajes
  • LocationSanto Domingo

Escrito 03 septiembre 2010 - 10:00

Bueno hay diferentes formas, pero una forma fácil sería utilizando los componentes Zeos para hacer la conexión llenando los parametros correspondientes,esa es mi forma de hacer la conexión rápida y sencilla.
  • 0

#3 Jagluiperd

Jagluiperd

    Member

  • Miembros
  • PipPip
  • 36 mensajes
  • LocationBuscando a Wally

Escrito 04 septiembre 2010 - 04:46

Hola Lynn.

Tal como te comente por privado: lo lamento pero no tengo instalado Delphi, solo Lazarus.

Te dejo un enlace de como se haría desde Lazarus empleando ZEOS:
http://voicixs.com/archives/198

En todo caso, siempre puedes "setear" a "manini" los parametros de la base de datos y su conexión.

Los valores para hacer el "seteo" los puedes definir en tiempo de codificación, u obtenerlos al vuelo
durante la ejecución, bien siendo el usuario quien los introduzca manualmente, o leyéndolos de un .TXT (¿.INI?).

Saludos.

  • 0

#4 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.448 mensajes
  • LocationMéxico

Escrito 04 septiembre 2010 - 06:54

Asi es, la forma más práctica de configurar las propiedades de la conexión es la lectura de archivos INI.

Algo así:


En el archivo INI se tiene esto:

[CONF]
Rutadb=c:\tuprograma\basededatos
usuario=juan
contrasena=cualquiera


Y en delphi lo lees así.



delphi
  1. procedure TfrmPrincipal.FormCreate(Sender: TObject);
  2. begin
  3.   IniFile := TIniFile.Create('tuarchivo.ini');
  4.     RutaBase := IniFile.ReadString(conf,'Rutadb','');
  5.     Usuario := IniFile.ReadString(Conf,'Usuario','');
  6.     Passw := IniFile.ReadString(Conf,'Contrasena','');
  7.   IniFile.Free;
  8.  
  9.   //Si utilizas la base de datos local
  10.   IBDatabase1.DatabaseName := RutaBase;
  11.  
  12.   //Si utilizas la base de datos remota
  13.   Servidor := 'NombreServidor'; // nombre del servidor o IP, (yo prefiero el nombre del servidor)
  14.   IBDatabase1.DatabaseName := Servidor + ':' + RutaBase;
  15.  
  16.   IBDatabase1.Params.Values['USER_NAME'] := Usuario;
  17.   IBDatabase1.Params.Values['PASSWORD'] := Passw;
  18.  
  19.   IBDatabase1.Connected := true;
  20. end;



Salud OS

[off-topic]Lynn, para que los demás compañeros sigan el curso del hilo y sea de utilidad por favor evita las preguntas  por mensaje privado, todos te lo agradeceremos[/off-topic]
  • 0

#5 cadetill

cadetill

    Advanced Member

  • Moderadores
  • PipPipPip
  • 994 mensajes
  • LocationEspaña

Escrito 06 septiembre 2010 - 10:39

Buenas,

Estoy de acuerdo con egostar, cualquier conexión que queramos hacer, sea el componente de conexión que sea, tiene que pasar por declarar sus propiedades en un archivo de configuración (o cualquier otro recursos que no sea la de directamente en el componente) por el simple motivo de que de esta manera podemos instalar la aplicación donde queramos y no nos restringimos en a la carpeta nuestra de trabajo.

A partir de esta decisión, pues se puede conectar con Zeos, IBX, FIBPlus, ADO, DBX,...... vamos, con cualquier acceso nativo o acceso genérico que tenga drivers para Firebird

Nos leemos

  • 0

#6 TiammatMX

TiammatMX

    Advanced Member

  • Miembros
  • PipPipPip
  • 1.750 mensajes
  • LocationUniverso Curvo\Vía Láctea\Sistema Solar\Planeta Tierra\América\México\Ciudad de México\Xochimilco\San Gregorio Atlapulco\Home

Escrito 06 septiembre 2010 - 10:50

Asi es, la forma más práctica de configurar las propiedades de la conexión es la lectura de archivos INI....


¡¡¡AH!!!, ¿acaso existe otra forma?  :tongue: :tongue: :cheesy:

De hecho, ésta es la única forma estable que conozco de conectarse a una base de datos Interbase/Firebird..., lo demás, a veces complejiza innecesariamente el desarrollo...
  • 0




IP.Board spam blocked by CleanTalk.