谁在delphi中用过连接池

做一个共享的连接池，程序初始化的时候把连接池连好，每次需要连接时创见个连接，从池子取出需要的连接

复制给新建连接，用完释放新建连接即可。我见过别人写的共享酣绩丰啃莶救奉寻斧默的连接池应用在数据库+客户端这种结构上，支持多线程！

DELPHI中建立与数据库链接有几种方法，BDE,ADO等。这里我只介绍一种ADO，因为我觉得这是最常用而且是最好用的方法。

1. 准备工作开始，新建一个FORM。在控件栏找到ADO一栏，把里面的ADOConnection和ADOQuery两个各建立一个放在FORM里。这两个控件是不可见的，所以你可以随便放在FORM的任何位置。然后再找到DATA ACCESS一栏，把它下属的DataSource控件一放到FORM里。OK,这三个就可以建立连接了。

2.设置，首先我们设置ADOConnection，这个控件就是与数据连接的控件。双击它d出配置窗口，单击BUILD..按钮，出现数据库链接属性窗口，如果是本地的数据库可以在下拉列表选择服务器名称或者自己直接输入服务器名称（远程的直接输入IP即可），然后输入登录密码和选择数据库。设置完成点击测试连接，显示成功说明链接正常，单击完成退出设置。

ADOQuery这个控件呢是负责进行用SQL语言 *** 作数据库的，在它的属性栏有个connection属性，点击它的下拉菜单选择刚刚建立好的ADOConnection1，DataSource控件则是存放结果的地方，把它的DataSet属性设置成ADOQuery1。这样我们就可以通过调用ADOQuery来对数据库进行 *** 作了。

链接好数据库以后就可以对数据库进行 *** 作了。最常见的用法是建立一个DBGRID，然后把他的connection属性选成我们的DAtasource1。如果你想预先设置好SQL语句的话，在ADOQUERY的左边属性栏里的SQL栏，点那个三个点的省略号输入你想查询的SQL语句。然后ACTIVE属性设置成TRUE，这样一运行，在DBGRID里就会显示你的SQL查询结果了。

AdoConnection1.ConnectionString:='Provider=SQLOLEDB.1Password=123Persist Security Info=TrueUser ID=saInitial Catalog=SampleData Source=.'

Adoconnection1.LoginPrompt:=False

Adoconnection1.Connected:=True

上面这段代码为SQL数据库的联接方式：最后一句Data Source=. 其中的“.”表示为数据库在本机，如果数据在其它地方，则将点改为IP地址或是服务器名称。 sample是我数据库名,可以改成你自已的,123是密码,也可以改成你自已的

---