本文假定所需连接的Access数据库为db_restaurant,如何连接
db_restaurant,现在将拉开帷幕。
首先,通过使用“File→New→Data Module”创建一个用于连接数据
库的窗体。然后,在“ADO”选项卡下选择“ADOConnection”控件与
“ADOQuery”控件。然后分别设置其“ConnectionString”属性与
“Connection”属性。
设置“ADOConnection”控件的“ConnectionString”属性步骤如下
1. 单击按钮,将弹出如下对话框,如图所示:
2. 单击“Build”按钮,配置连接字符串,接下来会看到下面的对话框,
如图所示:
3. 按照上面的格式配置即可。在窗体的“OnCreate”事件中添加如下
代码:
ADOConnectDataBase->Connected=true;
其次,在一个空白窗体中添加一个“DBGrid”控件、“DataSource”
控件、“ADOQuery”控件。分别设置其“DataSource”属性、“DataSet”
属性、“ConnectionString”属性。在当前窗体的“OnShow”事件中添加
如下代码:
AnsiString sql = "select AccountId as 用户编号,AccountName
as 用户名,AccountPassword as 密码,AccountRight as 权限,Describe
as 描述 from tb_AccountManage order by AccountId asc";
try
{
ADOQuery->Close();
ADOQuery->SQL->Clear();
ADOQuery->SQL->Add(sql);
ADOQuery->ExecSQL();
ADOQuery->Active = true;
}
catch(...)
{
MessageBox(FrmSystemManage->Handle,"数据库连接失败!","信息提示",MB_OK);
}
假如指定表中有数据,你将看到一个正确的执行过程。