Delphi 7连接MySql 5.5.15

发布时间：2020-12-15 10:00:00 所属栏目：大数据来源：网络整理

导读：Delphi 7连接MySql 5.5.15 1.ODBC方式 ??? 必须要先有MySql的ODBC驱动，我下载的是全安装版，包括MySql服务器、各种所支持的连接、工作台、示例数据库、文档，若是无ODBC驱动，可以到官网http://dev.mysql.com/downloads/connector/odbc/下载。 ①数据源方式

Delphi 7连接MySql 5.5.15

1.ODBC方式
??? 必须要先有MySql的ODBC驱动，我下载的是全安装版，包括MySql服务器、各种所支持的连接、工作台、示例数据库、文档，若是无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为数据库地址，User用户名，Password密码，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，加载工程项目包"...ZEOSDBOpackagesdelphi7ZeosDbo.bpg"，按顺序编译，或者右键选择"Compile All From Here"，如下图所示：

?? ?编译完成后，再选择"ZComponentDesign.bpl"，右键选择"Install"，安装组件成功，弹出如下对话框：

?? ?再添加所编译完成的目录，即"...ZEOSDBOpackagesdelphi7build"，菜单"Tools"→"Environment Options"→"Library"→"Library path"，添加此目录。另外，若需要在编写代码时，能进入ZeosLib源代码的话，需要添加源代码文件夹目录，包括："...ZEOSDBOsrccore"、"...ZEOSDBOsrcparsesql"、"...ZEOSDBOsrcplain"、"...ZEOSDBOsrcdbc"和"...ZEOSDBOsrccomponent"（注意：会在这些目录下再次编译单元文件）。
?? ?新建一个应用程序，在窗体上放置TZConnection、TZQuery、TDataSource和TDBGrid，在窗体创建函数里，写入以下代码：

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数据库客户端所需的DLL(即：libmysql.dll，这里我安装的是在"...MySQLMySQL Server 5.5lib"里面)复制到Windows系统目录(通常是"C:WINDOWSsystem32")或者工程目录下。程序如下图所示：

?
?? ?当程序发给别人使用时，需要连同"libmysql.dll"一起发送。若是显示的数据有乱码，这是因为MySQl数据库默认使用UTF-8字符集，则先在查询之前，设置字符集，如下代码所示：

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!