delphi下FireDAC连接mysql数据库零起点  
官方Delphi 学习QQ群: 682628230(三千人)
频道

delphi下FireDAC连接mysql数据库零起点


首先我用的是Delphi XE,FireDAC是这个版本自带的。

第一步,添加组件

TFDPhyMySQLDriverLink
TFDGUIxWaitCursor
TFDConnection
TFDQuery
TDataSource
TDBGrid

第二步,设置组件属性

TFDGUIxWaitCursor,不用设置,好像是显示sql执行时的等待的鼠标样式。
TFDPhyMySQLDriverLink,BaseDriverID:=MySQL,Vendorlib的值为mysql文件夹中的libmysql.dll的路径如 D:\MySQL\lib\libmysql.dl。
TFDConnection,DriverName:=MySQL,LlginPrompt:=false,Params里面是重点。

如下:
DriverID=MySQL
Server=127.0.0.1  //数据库服务器地址
database=数据库名称
User_Name=root //用户名
password=123456//密码
characterset=gb2312 //指定数据库的字符集,否则中文乱码

还有别忘了 Connected:=true,

TFDQuery,SQL里面写sql语句,例如 select * from 表名,Connection:=TFDConnection1(上面的组件的name。)
TDataSource,DataSet:=TFDQuery1
TDBGrid,DataSource:=TDataSource1

新建个botton按钮写下如下代码:

procedure TForm1.btn1Click(Sender: TObject);
begin
fdqry1.Close;
fdqry1.Prepare;
fdqry1.Open();
end;

既可以在DBGrid里显示查询效果了。

还有就是TFDConnection.Params的内容可以在窗口新建时写。如下:

procedure TForm1.FormCreate(Sender: TObject);
begin
con1.Close;
con1.Params.Clear;
con1.Params.Add('DriverID=' + 'MySQL');
con1.Params.Add('Server=' + '127.0.0.1');
con1.Params.Add('Database=' + 'databasename');
con1.Params.Add('User_Name=' + 'username');
con1.Params.Add('Password=' + 'password');
con1.Params.Add('CharacterSet=gb2312');
con1.Connected := True;
end;


推荐分享
图文皆来源于网络,内容仅做公益性分享,版权归原作者所有,如有侵权请告知删除!
 

Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号

执行时间: 0.091487884521484 seconds