Delphi多线程下的ADO编程_Web开发_学习笔记★闵涛★计算机学习电脑编程软硬件技巧


	转至繁体中文版	\| 网站首页 \| 图文教程 \| 资源下载 \| 站长博客 \| 图片素材 \| 武汉seo \| 武汉网站优化 \|

Delphi多线程下的ADO编程

作者：闵涛文章来源：闵涛的学习笔记点击数：2587 更新时间：2009/4/23 10:50:07

查询table2，③代表为线程3所有，使用频率较高

②ADOQuery3

查询table2，③代表为线程2所有，使用频率很高

①ADOProcedure1

ADO存储过程控件向表table2插入数据，属于线程1频繁使用

①ADOProcedure2

修改ADOProcedure1插入的记录，属于线程1频繁使用

其中线程3和线程2使用ADO控件时没有加锁，而线程1的所有访问都加锁了（这样做毫无作用）

程序的结构出来了，问题在哪里呢？接下来我写了一个小小的测试程序，该程序的结构与上面相同，它拥有三个线程和一个DataMoule单元，线程一通过ADOQuery1查询数据库DBTest的table1的记录，线程二通过ADOQuery2向table1中插入记录，线程三通过ADOQuery3修改table1中最后一条记录的某个字段。ADOQuery1、ADOQuery2、ADOQuery3都通过ADOConnection1与数据库DBTest1建立连接，一开始，所有的线程都不做同步，运行，OK!错误出来了其中两个错误正是我所想要的，这就是我的程序报的错啊。

图二

接下来我将三个ADOQuery都加上锁，再运行没问题，我又将ADOQuery分别通过三个不同的ADOConnection来连接数据库且不加锁也没有问题。看来我是找到那个可恶的炸弹了，怎么拆了它？

排除炸弹

炸弹找到了，我该怎么拆它？是简单的做线程同步还是每个线程都是用一个ADOConnection？这下我再也不敢蛮干了，我得好好看看这方面的资料，在Delphi帮助文档，《Using the main VCL thread》我找到了下面一段话：

……

Data access components are thread-safe as long as each thread has its own database session component. The one exception to this is when you are using Access drivers. Access drivers are built using the Microsoft ADO library, which is not thread-safe.

…..

同样在Delphi的帮助文档《Managing multiple sessions》中给我明确的建议：

……

If you create a single application that uses multiple threads to perform database operations, you must create one additional session for each thread.

…..

喔找到了：ADO控件是线程不安全的，所以如果你的程序是使用多线程访问数据库的话你应该确保每个线程都有自己的会话。

事实上在另外一本书《Delphi 4编程技术内幕》一书在谈到线程安全数据库访问也有相同的建议，不过台湾李维先生在他的《Delphi 5.X ADO/MTS/COM+高级程序设计篇》却说，如果你的程序不是连接多个数据库的话，最好同一数据库使用一个连接，不要使用多个连接。怎么办？谁对谁错？为什么要使用一个连接呢？这主要是从服务器来考虑，因为数据库服务器需要为每个连接分配一定的资源并对其进行维护，连接数越多服务器方所耗的资源就越多，服务器的性能也就越差，所以要尽可能的减少客户端的连接数。好在我的程序是作为服务器程序增加一些连接对数据库服务器的影响不会很大，现在我可以重新设置我的数据库访问结构模型了

数据库：

ADOConnection1

ADOConnection2

Table1

Table2

①ADOQuery1

②ADOQuery3

①ADOProcedure1

①ADOProcedure2

①UpdateQuery

③ADOQuery2

上一页 [1] [2] [3] 下一页