Delphi 10 Seattle FireDAC 连接池配置过程
来源:互联网 发布:app服务器端开发 java 编辑:程序博客网 时间:2024/05/23 01:25
一直想用Delphi 10 Seattle FireDAC 写个中间层,当然不得不解决连接池的问题。
网上搜到一个只有一点代码的例子,没有配置步骤,研究了半天的英文帮助文档,总算试验成功,给苦无资料的大家分享:
1、先建一个数据库的文本参数文件,文件名FDDrivers.ini,存放在执行文件所在目录,内容以oracle为例如下:
[Oracle_Pool]
DriverID=Ora
Database=(DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = 172.16.1.220)(PORT = 1521)))(CONNECT_DATA = (SERVER = DEDICATED)(SERVICE_NAME = orcl)))
User_Name=test
Password=test
CharacterSet=UTF8
Pooled=true
这里Pooled=true是不能少的,是连接池里的关键设置哦
2、在数据模块里,放置FDManager1控件,并将其ConnectionDefFileName指向FDDrivers.ini文件,如D:\FDmanager\Win32\Debug\FDDrivers.ini,并把Active设为true
3、在数据模块里里,放置FDPhysOracleDriverLink,并将其VenderLib指向oracle的库文件D:\FDmanager\Win32\Debug\oci.dll,这里要说明的是,需要四个库文件:
oci.dll,oraocci11.dll,,oraociei11.dll,orasql11.dll,这些文件全部都放在执行文件所在目录。
4、还要放置FDGUIxWaitCursor在数据模块里
5、放置数据库连接控件FDConnection,在数据模块里,并将其ConnectionDefName指定为FDDrivers.ini文件中的第一行中的名称,可以下拉选的
6、这样设置好后,在窗口代码里,就可以按如下调用:
procedure Tfrm1.Button2Click(Sender: TObject);
begin
if not dm.FDConnection1.Connected then
dm.FDConnection1.Connected := True;
with dm.FDQuery2 do
begin
close;
sql.Clear;
sql.Add('select count(*) num from base_tab ');
open;
end;
Label2.Text:=dm.FDQuery2.FieldByName('num').AsString;
dm.FDConnection1.Connected := False;
end;
注意,这里的dm.FDConnection1.Connected := True就是在连接池里获取一个连接,而dm.FDConnection1.Connected := False;则是归还一个连接,不是断开,
- Delphi 10 Seattle FireDAC 连接池配置过程
- FIREDAC连接池配置
- Delphi FireDAC 连接mysql
- Delphi东京版FireDAC连接MSSQL2000
- Delphi 10 Seattle,C++ Builder 10 Seattle,RAD Studio 10 Seattle 官方下载激活
- Delphi 10 Seattle,C++ Builder 10 Seattle,RAD Studio 10 Seattle 官方开发文档
- Delphi 10 Seattle Update1下载破解激活
- delphi 10 seattle "Automatic Reference Counting"问题
- Delphi 10 Seattle不支持intel atom?
- delphi 10 Seattle 第一个Android程序
- delphi 10 seattle 安卓服务开发(一)
- delphi 10 seattle 安卓服务开发(二)
- delphi 10 seattle 安卓服务开发(三)
- Delphi 10 Seattle小票打印控件TQ_Printer
- Delphi 10 Seattle小票打印控件TQ_Printer
- 用FireDAC连接oracle
- (FireDAC) 连接定义
- FireDAC连接MYSQL
- 如何申请芬兰居留许可(留学)
- Git详解之七 自定义Git
- Spark-1.0.0 standalone分布式安装教程
- 使用MyBatis对表执行CRUD操作——基于XML的实现
- Git详解之八 Git与其他系统
- Delphi 10 Seattle FireDAC 连接池配置过程
- neo4j的examples之EmbeddedNeo4jWithCustomLogging.java
- java学习链接资源
- Android 中的BroadCastReceiver
- 逻辑回归 S函数 极大似然 这三者的理解 结合具体案例
- Git详解之九 Git内部原理
- nginx缓存优先级(缓存问题者必看)
- UIBarButtonSystemItem样式
- IP TCP和HTTP