[DELPHI] Connessione TADOConnection verso server remoto: gestire i timeout

[euthymos]

Sto realizzando una semplice applicazione client che accede a un DB remoto attraverso un componente TADOConnection.

Ogni tanto capita che il server remoto sia offline o non funzioni correttamente. Quando ciò accade, la mia applicazione si blocca per 30 secondi senza dare segni di vita.

Questo è un comportamento sbagliato. C'è un modo per "annullare" il tentativo di connessione? Sicuramente sì. Ho provato a rendere la connessione asincrona e ad interromperla con il metodo Cancel, ma facendo in questo modo la connessione sembra sempre "completata con successo" quando in realtà non lo è.

Non riesco a capire come posso far sì che il mio programma aspetti che questa connessione venga stabilita, permettendo però all'utente di interrompere il tentativo di connessione.
Qual è il metodo più efficiente per ottenere questo risultato?

Grazie in anticipo.