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;

 

相关阅读 >>

Delphi executewait运行一个程序等待其结束

Delphi cxgrid使用小结

Delphi 用firedac获取 sql server错误文本信息

Delphi检查网络连接状态3种方式

Delphi 从 twebbrowser中获得当前输入处的链接

Delphi hex 相关单元

Delphi将目录删除到回收站中

Delphi xe 制作的萤光时钟，可改作屏保

Delphi 首字母转换大写

Delphi 内存管理[4]

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi下FireDAC连接mysql数据库零起点