Fórum Configurando TIBDatabase em run time #221742
23/03/2004
0
Como faço para dizer que meu TIBDatabase deve ter as seguintes configurações via runtime:
[ ] Local [x] Remote
Serve: AuxDireção
Protocol: TCP
Obrigado
[ ] Local [x] Remote
Serve: AuxDireção
Protocol: TCP
Obrigado
Jonnymarques
Curtir tópico
+ 0
Responder
Posts
23/03/2004
Delphi32
respondida em:
[url]http://delphiforum.icft.com.br/forum/viewtopic.php?t=39466[/url]
[url]http://delphiforum.icft.com.br/forum/viewtopic.php?t=39466[/url]
Responder
Gostei + 0
23/03/2004
Aroldo Zanela
Colega,
Quando você precisa efetuar alterações de configurações de acordo com o local de instalação, talvez o exemplo abaixo seja adequado:
Conteúdo do arquivo INI (GerarEMS.INI):
Quando você precisa efetuar alterações de configurações de acordo com o local de instalação, talvez o exemplo abaixo seja adequado:
procedure TForm1.FormCreate(Sender: TObject); var ArquivoINI: TIniFile; begin ArquivoINI := TIniFile.Create(´GerarEMS.INI´); dbLocadora.Connected := false; dbLocadora.DatabaseName := ArquivoINI.ReadString(´SERVIDOR´,´Banco de Dados´,´´); dbLocadora.Connected := true; ArquivoINI.Free; end;
Conteúdo do arquivo INI (GerarEMS.INI):
[SERVIDOR] Banco de Dados=ZETA:D:\FB-DADOS\LOCADORA.GDB
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)