Olá estimado,
Boa tarde. Exemplo de .INI
[BaseDados]
Servidor=localhost
Usuario=sysdba
Senha=vj|}n{tn
Base=c:\vendas1\base\vendas.gdb
No create do datamodule no delphi:
............
var
sServidor, sUsuario, sSenha, sBase : String;
iniFile : TIniFile; // da um uses IniFiles
begin
iniFile := TIniFile.Create(ExtractFilePath(Application.ExeName) +
'config.ini');
with iniFile do begin
sServidor := ReadString('BaseDados', 'Servidor', '');
sUsuario := ReadString('BaseDados', 'Usuario', '');
sSenha := Desencripta(ReadString('BaseDados', 'Senha', ''));
sBase := ReadString('BaseDados', 'Base', '');
Free;
end;
sqlBase.Connected := false;
sqlBase.Params.Clear;
sqlBase.DriverName := 'Interbase';
sqlBase.ConnectionName := 'Vendas';
sqlBase.Params.Values['Database'] := sServidor + ':' + sBase;
sqlBase.Params.Values['User_Name'] := sUsuario;
sqlBase.Params.Values['Password'] := sSenha;
sqlBase.Params.Values['SQLDialect'] := '3';
sqlBase.Params.Values['Protocol'] := 'TCP/IP';
sqlBase.Params.Values['BlobSize'] := '-1';
sqlBase.Params.Values['CommitRetain'] := 'False';
sqlBase.Params.Values['Interbase TransIsolation'] := 'ReadCommited';
sqlBase.Params.Values['WaitOnLocks'] := 'True';
sqlBase.Params.Values['EnableBCD'] := '0';
sqlBase.Connected := true;
end;
Saudações.
---
[]'s
Alexandre
Frase da semana: "Não basta ter grandes qualidades, cumpre saber
usá-las." (La Rochefoucauld)
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Luciano-User-BA
Enviada em: sexta-feira, 13 de janeiro de 2006 15:15
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Felipe Geyer - Outros Colegas - Parametros de
conexão em BD Firebird apartir de arquivos INI
Olá camarada!
Seguinte...
Eu sei manusear os TIniFile.
Acho que formulei mal meu questionamento.
O que eu queria mesmo era uma dica
de como montar este .ini
Quis os paramêtros necessários
para fazer uma conexão dinâmica
com DELPHI + DBEXPRESS + FIREBIRD
eu devo incluir no arquivo?
E os tipos?
* Não quero utilizar o LoadParamsOnConnect...
* Porque vou precisar encripar alguns dados
* usuario, senha, etc.
O que eu devo/tenho que carregar do .ini?
Será que são todos os valores que insiro no SqlConnection em tempo de
design?
Charset, Biblioteca cliente FBCLIENT.DLL, Dialect, RoleName,
CommitRetain, LibraryName, LoginPromtp, BlobSize, ErrorResourceFile,
etc. etc...
Entendeu?
Valeu.
Abraços
Luciano-User-BA
Filipe escreveu:
> Cara, para todas as configs que podem ser manipuladas por strings
> pode-se usar arquivos Ini. No help do delphi procure por TIniFile.
>
>
> []'s
>
> Filipe Geyer
>
> ----- Original Message -----
> From: Luciano-User-BA
> To: delphi-br@yahoogrupos.com.br
> Sent: Friday, January 13, 2006 9:58 AM
> Subject: [delphi-br] Parametro de conexão em BD Firebird apartir de
> arquivos INI
>
>
>
> Oi gente...
> Alguem aí tem um exemplo de como carregar paramêtros de conexão
> apartir de um arquivo .ini
> tipo: caminho do bd, senha, usuario e outras configurações?
> Tem como incluir todos os parametros neste arquivo?
> Tipo: charset, dll cliente, etc...
> Enfimm... tudo que fica no editor de conexão?
>
> Delphi 7 - BDExpress - Firebird
>
> Obrigado
> Luciano-User-BA
>
>
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
