Delphi7连接MySql.docVIP

Delphi 7连接MySql 分类： MySql Database Delphi 2011-12-07 18:57 56人阅读 评论(0) 收藏 举报 ??????? 网上有很多关于Delphi连接MySql数据库的文章，在这里，我只记录下自己测试过的方法，以备所需。系统环境：Windows XP SP3软件环境：Delphi 7 、mysql-installer-1.ODBC方式??? 必须要先有MySql的ODBC驱动，我下载的是全安装版，包括MySql服务器、各种所支持的连接、工作台、示例数据库、文档，若是无ODBC驱动，可以到官网/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=;?Database=world;?User=root;?Password=a123;?Option=3;? ??? 在TADOQuery写查询语句，设置Active为True，数据都显示在表格上，如下图所示：2.ZeosLib方式??? ZeosLib是一个用于Borland开发工具的数据库中间件，包括Delphi、C++ Builder和Kylix。从/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，在窗体创建函数里，写入以下代码： 01020304050607080910111213141516171819 procedure?TForm1.FormCreate(Sender:?TObject);?begin???//互相关联???zqry1.Connection?:=?zcon1;???ds1.DataSet?:=?zqry1;???dbgrd1.DataSource?:=?ds1;???//设置参数???zcon1.Protocol?: