alterar o caminho do banco de dados

[rodrigosil]

olá pessoal. gostaria da ajuda do amigos para resolver um problema...

Desenvolvi uma agenda a para empresa onde trabalho (delphi7 + fb 2.0, conexao dbexpress), o problema é que deixei o caminho do banco de dados diretamente setado nas propriedades do sqlconnection, acontece que preciso instalar em outra empresa agora e queria colocar uma forma do usuario configurar o caminho do banco de dados que fica em servidor diferente (outro caminho).

quando executo o programa ele dá erro pois não encontra o banco né, quero que quando o sitema não encontre o banco ele abra um form para confirmar o caminho do banco de dados

já tentei com try e except mas não consegui

se alguém puder me dar uma dica fico grato.

obrigado desde já.

[Jhonas]

o problema é que deixei o caminho do banco de dados diretamente setado nas propriedades do sqlconnection, acontece que preciso instalar em outra empresa agora e queria colocar uma forma do usuario configurar o caminho do banco de dados que fica em servidor diferente (outro caminho).

Coloque este código no OnActive do 1º form que é chamado pela sua aplicação se este não for o form do Menu onde estão os componente de conexão com o banco de dados

procedure TFApres1.FormActivate(Sender: TObject);
var l :  Arq : TextFile;   Linha : string;
begin

   AssignFile(Arq, 'C:\MEUPROG\Net.txt');
   Reset(Arq);
   while not EOF(Arq) do
      begin
        ReadLn(Arq, Linha);
        FMenu.IBDatabase1.DatabaseName := Linha;
      end;
   CloseFile(Arq);

end;

crie um arquivo pelo bloco de notas chamado Net.txt e digite dentro dele o seguinte:

Se for um caminho para a máquina local

C:\MEUPROG\Dados\DADOS.fdb

Se for um caminho da rede

SERVIDOR:C:\MEUPROG\Dados\DADOS.fdb

abraço

[rodrigosil]

obrigado pela ajuda Jhonas.

FMenu.IBDatabase1.DatabaseName := Linha;

essa linha esta dando erro poderia me explicar melhor...

FMenu.IBDatabase1.DatabaseName := Linha;

Fmenu = formalario onde esta a conexão ?

IBdataset1. ?

DatabaseName. ?

essas propriedades não encontrei nos parametros da conexão

valeu

obs:

não sei se é bem isso que preciso

o sistema esta rodando normal na rede e localmente

oque eu precisava era uma forma do usuario poder alterar o caminho do banco de dados

sem eu ter que alterar o exe para isso

uma forma dinamica entende

"preciso que quando o programa rodar e não encontrar o banco de dados que abra um janela para o usuario configurar o caminho do banco"

se tiver mais dicas te agradeço...

[Jhonas]

FMenu.IBDatabase1.DatabaseName := Linha;

essa linha esta dando erro poderia me explicar melhor...

o código que te passei é para uso com o componente IBQuery, IBDataBase e IBTransaction

se voce estiver usando o componente Query, então a coisa muda um pouco

Fmenu = formalario onde esta a conexão ?

Supondo que voce coloque os componente de conexão no form do Menu, sim.

não sei se é bem isso que preciso

o sistema esta rodando normal na rede e localmente

oque eu precisava era uma forma do usuario poder alterar o caminho do banco de dados

sem eu ter que alterar o exe para isso

uma forma dinamica entende

a forma do usuario poder alterar o caminho do banco de dados sem ter que alterar o exe é dessa maneira

exemplos no forum

http://scriptbrasil.com.br/forum/index.php...l=net\.txt

http://scriptbrasil.com.br/forum/index.php...l=net\.txt

http://scriptbrasil.com.br/forum/index.php...l=net\.txt

abraço