第七节:在多个线程时空中,把各自的代码塞到一个指定的线程时空运行
以 Ado 为例,常见的方法是拖一个 AdoConnection 在窗口上(或 DataModule 中),
再配合 AdoQuery ,DataSoure, DbGrid 等,就可以实现数据库的访问操作。
这种方式,可以理解为在主线程时空中访问数据库。
如果某一个查询或更新操作耗时较长,那么,界面将会假死。
1.在线程时空中访问数据库
其实,上文中提到的这个 AdoConnection 不单只能在主线程时空中访问,
亦可以在另一个多线程时空里访问。但有一个重要的前提:
即:任意时刻,只能是一个线程访问 AdoConnection !
可以是多线程时空访问,也可以是主线程时空访问,它们可以交替访问,但不能同时访问。
故此,我们可以定义一个 DataThread 线程时空,把其它线程时空中需要访问数据库的操作,
全部塞入到 DataThread 时空中。具体做法是在 DataThread 中设计一个接口,如下:
unit uJooThread;
interface uses Classes, uFooThread;
type TJooThread = class (TFooThread)
public
procedure Synchronize(AProc: TThreadMethod);
end ;
implementation { TJooThread } procedure TJooThread . Synchronize(AProc: TThreadMethod);
begin ExecProcInThread(AProc);
// 再设计一个等待 AProc 执行结果功能。
end ;
end .
这样既简化了其它线程访问数据库的操作,也避免了因为数据库操作耗时引起界面假死。
另外,如果访问数据库发生了异常,重新 Create AdoConnection 然后再连接的操作也在这一个线程中进行,
就不必考虑数据库操作的先后问题。如:不会出现需要访问数据库时, AoConnection 是损坏状态的情况。
也就是说,用这个线程,把访问数据库的操作进行了排队。
定义一个工作线程A, 先从数据库中取参数,再进行计算,然后把结果再更新到数据库。
如果有10个线程A实例,那么线程A访问数据库的时候,只需要把访问操作塞进 DataThread 中即可。
有朋友肯定会有疑问,为何不为每一个线程指定一个 AdoConnection 。这样编程将会变得简单。
一、数据库的连接是会消耗资源的,连接数是有上限的。
二、如果每个线程的 AdoConnection 产生的操作都是访问同一个表。
那么数据库自身会上锁,将它们变成串行执行,并不能提高效率。
2.多个客户端,同时从数据库取参数会如何?
假设每个客户端通过一个 AdoStoredProcduce (存储过程)来获取参数,我们可以在此存储过程中,
加入数据库的 sp_getapplock (以 MSSQL为例)来让客户端按顺序获取到参数。更新亦同理。
由此可见,学习了多线程的锁,亦能推而广之理解数据库的锁。
以下是详细代码,至此,本教程的任务基本完成。
本例的调用方法就不写了。如果你读懂了所有的教程,应该会写了。
如果没读懂,写了又有什么意义呢?请恶补面向对象的基础知识。
以后的其它教程,均以本多线程教程为基础。
unit uJooThread;
interface uses Classes, SyncObjs, uFooThread, uFooList;
type PSyncRec = ^TSyncRec;
TSyncRec = record
Method: TThreadMethod; // 这是类的方法
Proc: TThreadProcedure; // 这是匿名方法
全部评论
专题导读
热门推荐
热门话题
阅读排行榜
|
请发表评论