1:我在窗体上加一个DBGrid,怎么样才能够使其表格在运行的时候显示数据。请一步一步地给我说清楚,包括控件的属性。
2:怎么设置利用ADO控件的连接数据库的相对路径, 使程序无论在哪台机子都可以正确的保存和读取数据?
Delphi 中怎么用ADO连接数据库?
答案:2 悬赏:40
解决时间 2021-03-05 23:30
- 提问者网友:血樱陌殇
- 2021-03-04 23:14
最佳答案
- 二级知识专家网友:桑稚给你看
- 2021-03-05 00:33
以下以ADOQuery控件为例
在窗体上分别添加一个Button、ADOQuery、DataSource、DBGrid
设置属性分别为
DBGrid1的DataSource为DataSource1
DataSource1的DataSet为ADOQuery1
Button1的Caption为连接数据库
双击Button1,在事件里面添加如下代码
procedure TForm1.Button1Click(Sender: TObject);
var
DatabasePath: string;
begin
DatabasePath:= ExtractFilePath(Application.ExeName) + 'Data.mdb';
with ADOQuery1 do
begin
ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
DatabasePath + ';Persist Security Info=False';
SQL.Clear;
SQL.Add('SELECt * FROM TableMain');
Open;
end;
end;
自己改一下数据库名和SQL语句就可以实现返回数据库中相应数据的目的了。
在窗体上分别添加一个Button、ADOQuery、DataSource、DBGrid
设置属性分别为
DBGrid1的DataSource为DataSource1
DataSource1的DataSet为ADOQuery1
Button1的Caption为连接数据库
双击Button1,在事件里面添加如下代码
procedure TForm1.Button1Click(Sender: TObject);
var
DatabasePath: string;
begin
DatabasePath:= ExtractFilePath(Application.ExeName) + 'Data.mdb';
with ADOQuery1 do
begin
ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
DatabasePath + ';Persist Security Info=False';
SQL.Clear;
SQL.Add('SELECt * FROM TableMain');
Open;
end;
end;
自己改一下数据库名和SQL语句就可以实现返回数据库中相应数据的目的了。
全部回答
- 1楼网友:哥在撩妹请勿打扰
- 2021-03-05 01:34
这个问题可以考虑两方面的情况:
第一,你的sql2000没有打sp3或以上的补丁;
第二,你的sql没有设置账号登陆,可以在(local)(windows nt)上右键-属性-安全性-选上(sql server和windows)-确定
问题应该就可以解决了……
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯