Fórum Testar conexao com o banco, sem mensagem de erro. #596066
06/08/2018
0
Ola, gostaria de saber como faço para testar a conexao com o banco de dados postgresql
com o firedac sem que ocorra "erro de conexao"
Por exemplo, configurei as informaçoes necessárias para o login no componente TFDConnection
lá na tela "Component Editor", nessa tela tem um botao "TEST" que efetua essa verificaçao
Gostaria de fazer o mesmo procedimento na minha aplicaçao.
Se com as informaçoes passadas a conexao for bem sucedida eu continuo o fluxo da aplicacao
caso contrario eu exibo uma mensagem e encerro a aplicacao, ou qualquer outra coisa
o importante é eu saber se será possivel conectar no banco sem que de erro na linha
FDConnection1.Connected := TRUE;
com o firedac sem que ocorra "erro de conexao"
Por exemplo, configurei as informaçoes necessárias para o login no componente TFDConnection
lá na tela "Component Editor", nessa tela tem um botao "TEST" que efetua essa verificaçao
Gostaria de fazer o mesmo procedimento na minha aplicaçao.
Se com as informaçoes passadas a conexao for bem sucedida eu continuo o fluxo da aplicacao
caso contrario eu exibo uma mensagem e encerro a aplicacao, ou qualquer outra coisa
o importante é eu saber se será possivel conectar no banco sem que de erro na linha
FDConnection1.Connected := TRUE;
Alberto
Curtir tópico
+ 0
Responder
Post mais votado
06/08/2018
Olá Beto boa tarde,
Beto você precisa apenas tratar a excessão, segue exemplo
Espero ter ajudado.
Beto você precisa apenas tratar a excessão, segue exemplo
try
FDConnection1.Connected := TRUE;
except
on E: Exception do
begin
{aqui você pode fazer várias tratativas, pode ver algumas especificas aqui http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Handling_Errors_(FireDAC) }
ShowMessage('Não foi possível realizar a conexão.');
Application.Terminate;
end;
Espero ter ajudado.
João Filho
Responder
Gostei + 1
Mais Posts
06/08/2018
João Filho
Olá Beto boa tarde,
Beto você precisa apenas tratar a excessão, segue exemplo
Espero ter ajudado.
Beto você precisa apenas tratar a excessão, segue exemplo
try
FDConnection1.Connected := TRUE;
except
on E: Exception do
begin
{aqui você pode fazer várias tratativas, pode ver algumas especificas aqui http://docwiki.embarcadero.com/RADStudio/Tokyo/en/Handling_Errors_(FireDAC) }
ShowMessage('Não foi possível realizar a conexão.');
Application.Terminate;
end;
end;
Espero ter ajudado.
Responder
Gostei + 0
06/08/2018
Alberto
Valeu amigo, vou testar.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)