• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

Delphi7连接MySql5.5.15

原作者: [db:作者] 来自: [db:来源] 收藏 邀请


1.ODBC方式
    必需要先有MySql的ODBC驱动,我下载的是全安装版,包含MySqlserver、各种所支持的连接、工作台、演示样例数据库、文档,若是无ODBC驱动,能够到官网http://dev.mysql.com/downloads/connector/odbc/下载。
①数据源方式
    首先,确认安装了MySql的ODBC驱动。打开“控制面板”→“管理工具”→“数据源”,切换到“驱动程序”页。查看“MySql ODBC 5.1 Driver",例如以下图所看到的:

    切换到"系统DSN"→"加入"→"MySql ODBC 5.1 Driver",例如以下图所看到的:

    弹出MySql数据源配置,数据源名称任意,TCP/IP Server为数据库地址。Userusername,Passwordpassword,Database连接的数据库。点"Test"进行測试连接。例如以下图所看到的:

    点击"OK"后,就可以看到新添加了一个数据源。打开Delphi 7,在窗口上放置TADOConnection、TADOQuery、TDataSource和TDBGrid,相互之间关联。配置TADOConnection的连接字符串。"提供程序"选择"Microsoft OLE DB Provider for ODBC Drivers",下一步,选择"使用数据源名称"。下拉选择刚才配置的数据源,其它的不用再填写,測试连接,例如以下图所看到的:


    在TADOQuery写查询语句。设置Active为True,数据都显示在表格上,例如以下图所看到的:
 
②驱动方式
    跟上面一样,先确认安装MySql的ODBC驱动。打开Delphi 7,在窗口上放置TADOConnection、TADOQuery、TDataSource和TDBGrid,相互之间关联,配置TADOConnection的连接字符串,为下面内容:
1
Driver={MySQL ODBC 5.1 Driver}; Server=127.0.0.1; Database=world; User=root; Password=a123; Option=3; 
    在TADOQuery写查询语句,设置Active为True,数据都显示在表格上,例如以下图所看到的:

2.ZeosLib方式
    ZeosLib是一个用于Borland开发工具的数据库中间件,包含Delphi、C++ Builder和Kylix。

http://sourceforge.net/projects/zeoslib/files/下载"ZEOSDBO-6.6.6-stable"版本号,解压到目录。

打开Delphi 7,载入工程项目包"...\ZEOSDBO\packages\delphi7\ZeosDbo.bpg",按顺序编译,或者右键选择"Compile All From Here",例如以下图所看到的:

    编译完毕后。再选择"ZComponentDesign.bpl",右键选择"Install",安装组件成功。弹出例如以下对话框:

    再加入所编译完毕的文件夹。即"...\ZEOSDBO\packages\delphi7\build",菜单"Tools"→"Environment Options"→"Library"→"Library path",加入此文件夹。另外,若须要在编写代码时。能进入ZeosLib源码的话,须要加入源码文件夹文件夹。包含:"...\ZEOSDBO\src\core"、"...\ZEOSDBO\src\parsesql"、"...\ZEOSDBO\src\plain"、"...\ZEOSDBO\src\dbc"和"...\ZEOSDBO\src\component"(注意:会在这些文件夹下再次编译单元文件)。


    新建一个应用程序,在窗口上放置TZConnection、TZQuery、TDataSource和TDBGrid,在窗口创建函数里,写入下面代码:

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
procedure TForm1.FormCreate(Sender: TObject); 
begin 
  //---------------互相关联------------------------ 
  zqry1.Connection := zcon1; 
  ds1.DataSet := zqry1; 
  dbgrd1.DataSource := ds1; 
  //---------------设置參数------------------------ 
  zcon1.Protocol := 'mysql'
  zcon1.Port := 3306
  zcon1.HostName := '127.0.0.1'
  zcon1.User := 'root'
  zcon1.Password := 'a123'
  zcon1.Database := 'world'
  zcon1.Connected := True; 
  //---------------查询显示------------------------ 
  zqry1.Close; 
  zqry1.SQL.Text := 'SELECT * FROM City'
  zqry1.Active := True; 
end
    当然手动在设计器上进行设置也能够。

由于这里连接的是MySql数据库,须要拷贝MySql数据库client所需的DLL(即:libmysql.dll。这里我安装的是在"...\MySQL\MySQL Server 5.5\lib"里面)拷贝到Windows系统文件夹(一般是"C:\WINDOWS\system32")或者project文件夹下。

程序例如以下图所看到的:
 
    当程序发给别人使用时,须要连同"libmysql.dll"一起发送。若是显示的数据有乱码,这是由于MySQl数据库默认使用UTF-8字符集。则先在查询之前,设置字符集,例如以下代码所看到的:

1
2
3
4
5
6
7
begin 
  zqry1.Close; 
  zqry1.SQL.Text := 'set names gbk'
  zqry1.ExecSQL; 
  zqry1.SQL.Text := 'select * from city'
  zqry1.Active := True; 
end

    或者在TZConnection的Properties属性加入"codepage=gbk"。

3.其它方式

    另外,还有其它的第三方控件能够连接MySql等其它数据库。如:AnyDAC、MyDAC 、DAC for MySQL等等。


扩展资料:
1.MySQL with Delphi  http://delphi.about.com/od/mysql/MySQL_with_Delphi.htm
2.Zeoslib Portal :: Home http://zeos.firmos.at/
3.使用ZeosDbo元件與MySQL連線及建立Master/Detail資料表 http://cdwalkman.my-php.net/_tech/mysql_ZeosLib_delphi.htm

鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
基于matlab的fpga硬件在环仿真发布时间:2022-07-18
下一篇:
Matlab笔记发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap