![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
![]() Gracias Casimiro Notevi!
Gracias Neftali [Germán.Estévez]! Gracias Delphi01! ¡Saludos! No estoy seguro de como púedo saber que tipo de tecnología(s) se encuentran aplicadas para la conexión con Firebird, pero he encontrado estos componentes en el código base: TIBQuery (Tengo entendido se trata de IBX) TDataSource (Tengo entendido se trata de VCL) IB_Connection (Tengo entendido se trata de Interbase) TIBOQuery (Tengo entendido se trata de Interbase) DatabaseName = '192.168.1.2:Mi-BD' (La BD utilizada) En cuanto al código base, dejo un par de fragmentos que me indican que se usa una serie de parámetros especificados en alguna parte que aun no logro comprender. Archivo: proyecto.dpr Código:
frmSplash:=TfrmSplash.Create(Application); frmSplash.Caption:=sNomSystem; PreparaSplash(True, 1, 1, 1); // Mostrar, nMin, nMax, posIni ActSplash('Conectando con el Servidor...',' ',0); ActSplash('','Revisar que tenga todos los parámetros',1); If ParamCount<2 then begin myMessageDlg('Faltan Parámetros: '+_Enter+sNomSystem, mtError ,'',0); end; ActSplash('','...',1); //PRIMER parámetro: Indica se esta ejecutando desde RunSystem Try sTmp:=myUpperCase(ParamStr(1)); Except Raise Exception.Create(Incorrecto); end; //SEGUNDO parámetro: Path de la base de datos Case myStrIndex(sTmp,[_NomExeRun,'PALABRA']) Of 0:begin Try getDBPath:=ParamStr(2); DatosIni:=TStringlist.Create; k:=Pos(':',getDBPath); If k=0 then begin DatosIni.Add(''); DatosIni.Add(getDBPath); end else begin DatosIni.Add(Copy(getDBPath,1,k-1)); DatosIni.Add(Copy(getDBPath,k+1,100)); end; Except Raise Exception.Create(Incorrecto); end; end; begin DatosIni:=TStringlist.Create; DatosIni.LoadFromFile(_NomIniSystemMiFile); //GET Path BD de las DOS PRIMERAS LINEAS del file _NomIniSystemMiFile getDBPath:=DatosIni[0]+':'+DatosIni[1]; - Aparentemente se guarda en un archivo .ini pero no localizo un .ini que contenga 192.168.1.2:Mi-BD - Intenté reemplazando todas las coincidencias de 192.168.1.2:Mi-BD en archivos *.dfm por mi BD TEST en 192.168.1.1 ![]() - Mi BD Test ya me aseguré tenga su alias, puerto y bien configurada para ser accedida desde local y desde la red lan (probe accediendo con clientes como flamerobin y IBExpert y funciona bien en ambos casos). Nota: El proyecto se conecta unicamente a una BD en Firebird. Tu experiencia y orientación serán invaluables para avanzar en este tema. ¿Puedes proporcionar más información o consejos para abordar estos desafíos? ¡Aprecio mucho tu colaboración! |
#2
|
||||
|
||||
Cita:
Algo así: ![]() 1) Los 2 primeros se encargan de la conexión (y en el caso de IB/FB también de la transacción) 2) Luego tenemos el TIBTable o TIBQuery que representan TABLAS o SQLs y que se conectan a la conexión (varios TIBTable, TIBQuery, TIBOQuery,... se pueden conectar a la misma conexión) 3) Finalmente el TDatasource que se encarga de conectar un componente visual (por ejemplo un DBGrid) con una fuente de datos (un TIBTable, TIBQuery,...) Normalmente casi todos los componentes que se usan para Interbase (en versiones como la tuya Delphi 7) se usan también y son compatibles para conectarse a Firebird. En cuanto al código, parece que no está completo, pero hay una parte que muestra que la llamada se puede hacer con parámetros, y el segundo parece ser la Base de Datos.
ParamStr(2) hace referencia al segunda parámetro de la llamada a tu aplicación.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi ![]() P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
||||
|
||||
Parece que tienes definido algún alias de la BD, puedes editarla o quitarla, si quieres.
Mira esto: https://www.firebirdsql.org/rlsnotes...-db-alias.html |
#4
|
|||
|
|||
![]() Cita:
Ahora, cómo logro cambiar la configuración de conexión para conectarme a otra BD? Actualmente se conecta a 192.168.1.2:Mi-BD Ahora busco la forma de cambiar la configuración para conectarme a 192.168.1.1:DB-Test Salud OS |
#5
|
||||
|
||||
Cita:
![]() |
#6
|
|||
|
|||
![]() Creo que no me explique bien... En el enlace compartido se habla de cómo aplicar el aliasing (Database File Aliasing)... tema que ya tengo dominado. Así es como ya tengo mi 192.168.1.1:DB-Test listo y funcionando (comprobado). Mi proyecto pascal en delphi7 actualmente se conecta a 192.168.1.2:Mi-BD Ahora busco la forma de cambiar en el proyecto de Pascal la configuración para así lograr conectarme a 192.168.1.1:DB-Test (Pero, cuales archivos debería de buscar *.pas o *.dfm o *.ini? Ya intenté reemplazando en todos los archivos del proyecto esta cadena 192.168.1.2:Mi-BD por esta otra 192.168.1.1:DB-Test pero lamentablemente me sigue conectando a la 192.168.1.2:Mi-BD. Me da la impresión de que toma la configuración de otro lugar o incluso que el cambiar así desde código la cadena no afecta incluso posiblemente estoy omitiendo algun paso o simplemente no es la forma adecuada. Ya se hablo arriba sobre parametros de configuración a la BD y componentes IBX, por lo que pido nombres de articulos, terminología o incluso otras urls que me iluminen para de una vez por todas manejar estas configuraciones en mi proyecto y así lograr conectarme a la BD Test. |
#7
|
||||
|
||||
La ruta estará en componente de base de datos TIBDatabase, y en todo caso puede que lo cambien leyendo de algún archivo.ini pero para esto último tendríamos que ver el código del programa para poder saberlo.
EDITO: En el código que pusiste antes se ve que hace conexión también indicando la ruta como parámetro al ejecutar el programa, y si no trae parámetro entonces lo lee de un ini. |
#8
|
|||
|
|||
![]() Cita:
Luego cómo encuentro información que me de luz para interpretar y configurar parámetros? Entiendo que es una práctica comun usar parámetros pero no encuentro información en internet para leer al respecto. ¿Alguna información que ilumine mi andar en este grandioso recorrido? |
![]() |
|
|
![]() |
||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Proyecto emular procesadores usando Delphi PASCAL y Ensamblador | compsystems | La Taberna | 0 | 16-12-2014 22:36:52 |
Free Pascal proyecto del mes de SourceForge | Ñuño Martínez | La Taberna | 7 | 25-04-2014 21:45:22 |
Proyecto Oberon: Reimaginando todo (padre de pascal) | mamcx | La Taberna | 1 | 03-12-2013 23:18:53 |
[Z80 Pascal] Proyecto de compilador | Ñuño Martínez | ASM y Microcontroladores | 6 | 11-05-2010 14:37:47 |
primer proyecto con Mikro pascal no compila | gaston260 | ASM y Microcontroladores | 15 | 08-01-2010 04:45:55 |
![]() |
|