小弟有一個問題 用thread去db做查詢的動作，避免程式看起來當掉 但是，若查詢時間過久，使用者要停止查詢(timeout的時間設的很長) 我怎麼試就是不行 懇請先知指點

BDE 的 Query 的話參考這篇看看: http://groups.google.com.tw/groups?hl=zh-TW&lr=&rls=GGLD,GGLD:2005-04,GGLD:zh-TW&th=17efbe0da460e856&rnum=4

procedure TQueryWorkThread.RegisterCallBack(CallBackFunc:
pfDbiCallBack);
var
  OldSession: hDbiSes;
begin
  DbiGetCurrSession(OldSession);
  DbiSetCurrSession(FSession.Handle);  // Thread-dependant session
  DbiRegisterCallBack(nil, cbCANCELQRY, Integer(self), 0, nil,
     CallBackFunc);
  DbiSetCurrSession(OldSession);
end;    function QueryCancelCallBack(ecbType: CBType; iClientData: Longint;
  CbInfo: Pointer): CBRType stdcall;
begin
  with TQueryWorkThread(iClientData) do
    // NewJobRequest is a property I defined
    if NewJobRequest or Terminated then
      Result := cbrAbort else
      Result := cbrUseDef;
end;    Register callback:
  RegisterCallBack(@QueryCancelCallBack);    Unregister:
  RegisterCallBack(nil);

網路上大部份是說沒辦法 有提到一個 ODBCExpress 的東東, 可以去試試.

那再請問 delphi是如何實現timeout的 也就是說，當timeout時，如果是中斷查詢 並且釋放出該connection可供另一個查詢使用