因為我的程式需要不斷的去連接對方的 sql server的主機，
並把資料上傳，故所以基本上如果程式遇到斷線的話，我是以
執行sql語法看有沒有遇到錯誤來判斷是否連線。有的話，再
重新連線。

主執行緒->使用者界面
工作執行緒->負責不斷的檢偵資料庫遠端連線，並且有錯誤時重新連線，沒有時，新增資料。
在建構子已經指定FreeOnTerminate = true;

我在主程式結束時，如果遠端資料庫是斷線狀態，
我的工作執行緒如果正在這時執行 ADOConnect->Connected = true;
而timeout時間是假設是30秒的話。

主程式會等到timeout完才會結束。
可是我已經在主程式 OnClose裡加入工作執行緒->Terminate();

有沒有辦法可以讓工作執行緒在主程式結束時就結束，而不用等到ADOConnect的timeout結束才結束?
謝謝~~~

找了很久，我的情況和下面這個有點類似
http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=21914


就是無法設 connection timeout為更短，
而我是在另一個執行緒裡去測試連線，
在運作時不會影響到主執行緒，
只是在結束時，如遇到timeout，程式會等到timeout完時才結束，
而這段時間很久，約40~50秒~~~

我試過把 connection->close()
把thread關掉，都不行~~

版主你好，請問你有找到如果在connected := false時，可以直接讓db server上面的連線立即終斷嗎?謝謝，如果有的話可否分享一下如何解決這個問題，謝謝你。 

------
DELPHI初學者