delphi 7.0 通过ODBC5.1 连接MySQL数据库简单实例
(2008-11-23 21:52:52)
MySQL Connector/ODBC,使用delphi7.0利用ADO组建连接MySQL更加方便,对中文记录的支持效果也不错,下面以一个简单的实例来加以说明。
一、MySQL Connector/ODBC 5.1 的下载与安装
1、下载地址:
网址:https://www.sodocs.net/doc/ee5938511.html,/downloads/connector/odbc/5.1.html#win32
直接下载:
https://www.sodocs.net/doc/ee5938511.html,/Downloads/Connector-ODBC/5.1/mysql-connector-odbc-5.1.5-win32.msi
2、安装
抓一张图,一路next就可以了。
二、本地数据源的配置(以XP为例)
1、启动数据源管理
2、在数据源添加用户DNS,单击添加按钮
3、填写相关信息如下图
4、测试连接(连接成功)
至此数据源DNS配置成功!
三、delphi 7.0 编写简单程序
1、测试内容
执行一个查询,查询数据一个表达全部内容
mysql> use my_database;
Database changed
mysql> select * from my_table;
+-----+------+-------+----------+
| aid | id | first | sec |
+-----+------+-------+----------+
| 1 | 1 | 世界 | ID为奇数 |
| 2 | 5 | 中国 | ID为奇数 |
| 3 | 3 | 中国 | ID为奇数 |
| 4 | 2 | 124 | ID为偶数 |
| 5 | 4 | 时候 | ID为偶数 |
| 6 | 6 | 235 | ID为偶数 |
+-----+------+-------+----------+
6 rows in set (0.00 sec)
2、delphi 7.0设计界面
放置ADOConnection1、ADOQuery1、DataSource1和DBGrid1,如下图:
ADOConnection1连接的设置:双击ADOConnection1图标,设置如下图:
其他设置和ADO设置都一样了,不再重复。
四、测试效果
DELPHI 7 实例代码:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, Grids, DBGrids, StdCtrls;
type
TForm1 = class(TForm)
DBGrid1: TDBGrid;
ADOConn: TADOConnection;
DataSource1: TDataSource;
ADOQuery1: TADOQuery;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('select * from test.tb '); //为什么要指定数据库名
open;
end;
end;
end.