Configurar Um Componente...

[Lafey]

Olá pessoal, tudo certinho??

Pessoal eu to com uma dúvida, tenho um componente de conexão com DB (ZeosLib) e gostaria de saber como que eu faço para criar um arquivo de configuração para o componente, vou tentar explicar melhor...

No componente de conexão existe o "Hostname" que é o host onde esta o DB certo, estou criando aqui e o meu é "localhost" então eu coloco isso la, mas caso o programa esteja pronto e o "Hostname" seja outro como eu altero...

Acho que existe uns arquivos .ini que guarda configuração, estou certo?

como eu faço pra usar isso??

[]'s

[Micheus]

Lafey, dá uma espiada deste post em diante. Talvez lhe dê uma idéia de como resolver seu problema.

Abraços

[Lafey]

Ok ajudou bastante, mas gostaria de tirar algumas dúvidas e tentar resolver alguns problemas...

Eu não sei se esntou fazendo correto, mas coloquei o codigo abaixo em um botton (que irá gravar as configurações) e quando eu clico nele cria o arquivo ini, mas não grava nada nele...

As linhas

Try
   Inifile := TIniFile.Create('C:\Sysbib\Dados\ConfDB.ini');
   Inifile.WriteString('DATABASE',URL,'C:\Sysbib\Dados\SYSBIB_DB.GDB');
   Inifile.WriteString('DATABASE','SYSDBA',USR);
   Inifile.WriteString('DATABASE','masterkey',PWS);
Except
   ShowMessage('Ocorreu um erro!!!');
end;

As linhas 3, 4 e 5 não seria para gravar os dados no ini?? Eu não entendi muito bem a sintaxe desses comandos...

Obrigado...

[]'s

[Micheus]

Ok ajudou bastante, mas gostaria de tirar algumas dúvidas e tentar resolver alguns problemas...

Eu não sei se esntou fazendo correto, mas coloquei o codigo abaixo em um botton (que irá gravar as configurações) e quando eu clico nele cria o arquivo ini, mas não grava nada nele...

As linhas

Try
   Inifile := TIniFile.Create('C:\Sysbib\Dados\ConfDB.ini');
   Inifile.WriteString('DATABASE',URL,'C:\Sysbib\Dados\SYSBIB_DB.GDB');
   Inifile.WriteString('DATABASE','SYSDBA',USR);
   Inifile.WriteString('DATABASE','masterkey',PWS);
Except
   ShowMessage('Ocorreu um erro!!!');
end;

As linhas 3, 4 e 5 não seria para gravar os dados no ini?? Eu não entendi muito bem a sintaxe desses comandos... Obrigado... []'s

Acho que está faltando apenas um Inifile.Free, dê uma conferida.

Try
   Inifile := TIniFile.Create('C:\Sysbib\Dados\ConfDB.ini');
   Inifile.WriteString('DATABASE',URL,'C:\Sysbib\Dados\SYSBIB_DB.GDB');
   Inifile.WriteString('DATABASE','SYSDBA',USR);
   Inifile.WriteString('DATABASE','masterkey',PWS);
   Inifile.Free;  // *****
Except
   ShowMessage('Ocorreu um erro!!!');
end;

[Lafey]

Ai Micheus, td beleza??

funciono... eu tava fazendo coisa errada, por isso não escrevia... agora só falta eu aprender como passar os dados pro componente (meio caminho já foi, rsss)...

falando nisso eu n entendi a sintaxe do comando... como seria ela???

procedure TFConfig.Button1Click(Sender: TObject);
   Var Inifile: TIniFile;
begin
Try
   Inifile := TIniFile.Create('C:\Sysbib\Dados\ConfDB.ini');
   Inifile.WriteString('DATABASE', 'URL','C:\Sysbib\Dados\SYSBIB_DB.GDB');
   Inifile.WriteString('DATABASE','USR','SYSDBA');
   Inifile.WriteString('DATABASE','PWS','masterkey');
   Inifile.Free;
Except
   ShowMessage('ocorreu um erro, chame o burro do programador!!!');
end;

Obrigado novamente...

[]'s

[Micheus]

...

falando nisso eu n entendi a sintaxe do comando... como seria ela???

procedure TFConfig.Button1Click(Sender: TObject);
   Var Inifile: TIniFile;
begin
Try
   Inifile := TIniFile.Create('C:\Sysbib\Dados\ConfDB.ini');
   Inifile.WriteString('DATABASE', 'URL','C:\Sysbib\Dados\SYSBIB_DB.GDB');
   Inifile.WriteString('DATABASE','USR','SYSDBA');
   Inifile.WriteString('DATABASE','PWS','masterkey');
   Inifile.Free;
Except
   ShowMessage('ocorreu um erro, chame o burro do programador!!!');
end;

Se você fala do que significa os parâmetro que você passa no WriteString, o 1º é a sessão no arquivo, o 2 seria o identificador da chave e o 3º o valor que ele recebe.

No arquivo você identifica fácil quem são eles. No seu caso deve ter ficado assim:

[DATABASE]

URL=C:\Sysbib\Dados\SYSBIB_DB.GDB

USR=SYSDBA

PWS=masterkey

Lafey, sobre esta questão de gravar usuário e senha, acho interessante você dar novamente uma lida na parte final daquele post que lhe indiquei no início.

Outra coisa, com relação ao caminho para gravar seu arquivo ini, se ficar dentro da pasta de instação do seu programa, seria melhor que você não utilizasse esta informação constante (fixa no código). você pode utilizar ExtractFilePath(ParamStr(0)) para obter o path do seu programa, daí você concatena o nome do arquivo ini. Tem exemplo disto no forum - dá um pesquisada.

Abraços