ActiveDelphi

[Marcelo_Ribeiro]

E aí pessoal, beleza?

Tô necessitado de uma ajuda hehe

Tenho um aplicativo que faz importação automática de arquivos. Mas quando há alguma falha de conexão com o banco, deve fechar a aplicação. Só que tô tendo muita dificuldade pra fechar a aplicação.

EU tenho uma funçãozinha que, sempre antes de dar um open na consulta do Tquery, eu faço um TDatabase.Connected := False e depois dou um True pra saber se ainda tá disponível o banco.

Criei uma procedure KillTask que finaliza o processo do windows.

Também inclui um IpIdWatch, no método IdIPWatch1StatusChanged a validação if not IdIPWatch1.ForceCheck then KillTask. Mas simulando a queda de conexão desconectando o cabo de rede, ele trava e não fecha, mas se eu desabilitar a conexão de rede, funciona normal.

Alguem já teve algum problema parecido? Ou enfrentou essa necessidade? Pro Delphi, qual seria a diferença entre desconectar o cabo e desabilitar a conexão de rede?

Valew. Abraços