Delphi7连接Access数据库

Delphi7连接Access数据库

Access数据库是Office的比较小型数据库，随时可以拷贝，很方便，当数据量不大时，增删改查也比较快。

新建一个Access数据库文件，命名为accessdb.mdb，mdb格式是Access2000格式，如果是高版本的Access创建的可以为向下兼容另存为这种格式。在数据库内新建表card,并添加两行数据如下

打开Delphi7集成开发环境，在默认工程的Form1窗体放置一个ADOConnection1控件，并双击控件进入编辑界面，点击Build，弹出数据链接属性对话框，选择第一个Microsoft.Jet.OLEDB.4.0 Provider，点击下一步

在数据链接属性对话框的连接页签内选择我们刚刚新建的accessdb.mdb数据库文件，并点击测试连接，弹出测试连接成功对话框。保存相关配置

接着在Form1窗体添加ADOQuery1、DBGrid1、Datasource1三个控件，设置ADOQuery1的Connection属性为：ADOConnection1，SQL属性为：Select * from card。设置DBGrid1的DataSource属性为：DataSource1，

在Form1的OnShow事件中写如下代码：

procedure TForm1.FormShow(Sender: TObject);

begin

ADOQuery1.Open;

end;

即打开ADOQuery1,来执行SQL语句，获取数据库内容

F9运行程序，可以看大accessdb.mdb的内容被正常显示出来了