[firebase-br] Apontar o Banco em um arquivo .ini

Fabricio Videira develop.fabricio em gmail.com
Sex Ago 26 09:47:58 -03 2011


>
> Bom Dia Pessoal!!
>


> O que esta acontecendo agora criei o .INI até ai tudo bem; dai coloquei
> o código do no evento OnBeforeConnect
>
>
> > Vou tentar ajudar:
> >
> > No evento OnBeforeConnect do seu sqlConnection, coloque o seguinte
> código:
> >
> > procedure TDMC.sqlConnBeforeConnect(Sender: TObject);
> > begin
> > if FileExists(extractfilepath(application.ExeName)+'Aponta.INI') then //
> não esquece o PONTO.INI *{O delphi da erro nessa linha mais especifico
> "application.ExeName"); é que estou usando um Data Module para a aplicação}
> *
> > begin
> > sqlConn.ConnectionName := 'Database';
> > sqlConn.Params.Clear;
> >
> sqlConn.LoadParamsFromIniFile(ExtractFileDir(Application.ExeName)+'\nomedoarquivoINI.INI')
> ;*{Consequentemente nessa também}*
> > sqlConn.Params.Add('User_Name=sysdba');
> > sqlConn.Params.Add('Password=masterkey');
> > end else
> > begin
> >// ShowMessage('Arquivo de Inicialização da base de dados não
> localizado.'+chr(13)+chr(13)+
> > 'Favor verificar - DataModulo');
> >Application.Terminate;*{nessa também}*
> > end;
> > end;
> >
> > Agora, no seu arquivo INI você coloca o seguinte:
> >
> > [Database]
> > DriverUnit=DBXFirebird
> > DriverPackageLoader=TDBXDynalinkDriverLoader,DbxCommonDriver150.bpl
> >
> DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxCommonDriver,Version=15.0.0.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
> >
> MetaDataPackageLoader=TDBXFirebirdMetaDataCommandFactory,DbxFirebirdDriver150.bpl
> >
> MetaDataAssemblyLoader=Borland.Data.TDBXFirebirdMetaDataCommandFactory,Borland.Data.DbxFirebirdDriver,Version=15.0.0.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
> > GetDriverFunc=getSQLDriverINTERBASE
> > LibraryName=dbxfb.dll
> > VendorLib=fbclient.DLL
> > Role=RoleName
> > MaxBlobSize=-1
> > TrimChar=False
> > ErrorResourceFile=
> > ServerCharSet=
> > drivername=FIREBIRD
> > blobsize=-1
> > commitretain=False
> > localecode=0000
> > rolename=RoleName
> > sqldialect=3
> > isolationlevel=ReadCommitted
> > waitonlocks=True
> > trim char=False
> > Database=C:\Projetos\BASE.FDB
>
> > Compile SEMPRE seu EXE com a propriedade ACTIVE do seu sqlConnection (e
> demais componentes) sempre FALSE...
> >
> > Qualquer coisa nos grite.
> > Boa sorte.
> >
>
-- 
*
Att.

Fabrício Videira*
*Desenvolvedor de Softwares*
*Técnico em Suporte de Micros
*
(*(14) 3283-1336 *(*(**14) 8816-3810*
**develop.fabricio em gmail.com*



Mais detalhes sobre a lista de discussão lista