ActiveDelphi

[qmartins]

Boa tarde a todos, estou com a seguinte situacao, tenho uma funcao que verifica a conexao de um servidor com outro computador da rede. se o servidor tiver conexao com o terminal o resultado e true se nao existir conexao o resultado é false. quando existe conexao a resposta é rapida, porem quando nao ha conexao demora uns 3 minutos pra retornar o resultado false. eu preciso que a resposta seja rapida quando nao encontrar conexao. vou postar a funcao que uso. desde ja agradeco a quem ajudar.

function Tfrmprincipal.verifica_conexao(tipo:string;server:string;base:string):boolean;
begin

try
conexao_PDV.Connected := false;
conexao_PDV.Server := server;
conexao_PDV.Database := base;
conexao_PDV.Connected := true;

Result := true;
except
// aqui ta demorando muito, quando nao ha conexao //
Result := false;
end;

end;
end;

[marcosbaixista]

Qual componente você ta usando para se conectar?

Se não estou enganado, existe uma propriedade que não me lembro agora que determina a quantidade de tentativas de conexão até dar a resposta de erro.

Me fala o componente que verifico aqui pra você ok.
_________________
O ser humano busca e defende aquilo que ama.

[qmartins]

ola amigo, uso IbcConnection da paleta interbase access com firebird.

[marcosbaixista]

Verifique se este componente tem alguma dessas propriedades

- ConnectionTimeout
- IdleTimer
- CommandTimeout

Mexa nos valores dessas propriedades e teste para ver como se comporta ok.

Qualquer coisa poste ai ok.
_________________
O ser humano busca e defende aquilo que ama.

[qmartins]

Entao, procurei mas nao encontrei nenhuma dessas propriedades. mas valew de qualquer forma.

[informacaoweed]

Então... Pode não ter a ver mas, apenas para descargo de consciência, experimente colocar dentro do try somente o comando final, que ordena a conexão:

[qmartins]

blz vou testar e ja posto o resultado.

[qmartins]

desculpa a demora em responder é que passei o dia fora. mas entao fiz o teste colocando apenas o comando de conexao dentro do try, porem o resultado foi o mesmo, quando nao encontra conexao ele continua demorando pra retornar o execpt. se alguem tiver mais alguma dica, agradeco.

[qmartins]

Bom dia a todos, bom como nao tive o resultado como eu queria deu um geitinho que resovleu meu problema. vou explicar pra ajudar alguem quer passe pela mesma situacao. seguinte alterei na pasta do firebird o arquivo de configuracao chamado firebird.conf tem uma linha chamada connectiontimeout = 180 que equivale aos segundos alterei de 180 para 5 e com isso diminuiu o tempo de espera. ah outra coisa ao invez de informar o ip da maquina, informo no nome da maquina. valew galera.