在公司寫了一個資料查詢的小程式，因為需要連接多個外地的資料庫查詢，導致界面老是出現卡死的情況，聽說做成執行緒式可以解決這個問題，哪個大神能否給個例子參考？
uj5u.com熱心網友回復：
補充一下，用的是ado查詢oracle，謝謝！uj5u.com熱心網友回復：
用多執行緒時如果要訪問VCL就只能用獨占方式,我也用過多執行緒但是在操作時還是會象單執行緒一樣不能做其它的事,否則退出就報錯.uj5u.com熱心網友回復：
給你我的例子吧:uj5u.com熱心網友回復：
type //多執行緒-------------------TMyThread_KHFX= class(TThread)
protected
procedure Execute; override;
procedure checkdh;
end;
procedure TMyThread_KHFX.checkdh;
begin
frmTGZX_XSLTODB.CHECK_KHDHSTAT;
end;
procedure TMyThread_KHFX.Execute;
begin
synchronize(checkdh); //執行緒獨占方式 如果不用synchronize則可在執行執行緒時做其它操作,但是退出程式就報錯!~~
end;
//--------------------------------------------
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/93138.html
標籤：數據庫相關