[firebase-br] Off - Como uso o arquivo INI para conectar nobanco

[Cesar]

como assim não entendi essa parte que vc diz
'Os métodos Disconnect e Connect e a propriedade DatabaseName são
pertinentes ao IBO. Adapte ao seu componente.'
obrigado

----- Original Message ----- 
From: "Andrei Luís" <compuvale.software em gmail.com>
To: "FireBase" <lista em firebase.com.br>
Sent: Wednesday, November 29, 2006 9:18 AM
Subject: Re: [firebase-br] Off - Como uso o arquivo INI para conectar 
nobanco


César,

O princípio é esse que você colocou no FormShow, só que ao invés de
você jogar o conteúdo em um edit, você vai configurar o teu componente
de acesso, veja:

Coloque a leitura do arquivo ini no onCreate do seu form principal ou
do seu DM principal.

procedure Tdm.DMCreate(Sender: TObject);
var ini : tIniFile;
begin
   arquivo :=TIniFile.Create('c:\teste.ini');
   dm.cnSistema.Disconnect;
   dm.cnSistema.DatabaseName := arquivo.ReadString('Banco', 'Caminho','');
   try
      dm.cnSistema.Connect;
   except
      ShowMessage('Erro ao conectar-se ao banco de dados');
      Application.Terminate;
   End;
   arquivo.free;
end;

Os métodos Disconnect e Connect e a propriedade DatabaseName são
pertinentes ao IBO. Adapte ao seu componente.


O meu arquivo ini está assim:

[Banco]
Caminho=d:\banco\banco.fdb
CaminhoRede=192.168.1.10:d:\banco\banco.fdb

Qualquer dúvida posta aí.

[]
Andrei



Em 29/11/06, Cesar<cesar_newton em yahoo.com.br> escreveu:
> Off - Como uso o arquivo INI para conectar no banco
> Eu consegui fazer um arquivo INI . esta funcionando certim
> mais como eu faço agora para que esse arquivo acesse a minha base de
> dados..por exemplo
> la no meu arquivo INI esta assim 192.168 .0.1
> como eu faço para a minha aplicação buscar esse arquivo e conectar no 
> banco?
> eu uso Delphi 7 componente da Palheta Interbase, banco Firebird.
> o componente que eu uso para conectar no banco é IBDataBase
> eu fiz assim para gerar e acessar o meu arquvio INI
> procedure TForm1.Button1Click(Sender: TObject);
> var
>   Arquivo: TIniFile ;
> Begin
> // Abre o arquivo
> Arquivo := TIniFile.Create('c:\teste.ini');
> // Coloca o conteudo do Edit no arquivo
> Arquivo.WriteString('GERAL','Linha para testes',Edit1.Text);
> // Libera o arquivo da memoria
> Arquivo.free;
> end;
>
> procedure TForm1.FormShow(Sender: TObject);
> var
>   Arquivo: TIniFile ;
> Begin
>  Arquivo := TIniFile.Create('c:\teste.ini');
>  Edit1.Text := Arquivo.ReadString('GERAL','Linha para testes',Edit1.Text);
> Arquivo.Free;
> end;

______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço 
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa 


	

	
		
_______________________________________________________ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/