以下以ADOQuery控件为例
在窗体上分别添加一个Button、ADOQuery、DataSource、DBGrid
设置属性分别为
DBGrid1的DataSource为DataSource1
DataSource1的DataSet为ADOQuery1
Button1的Caption为连接数据库
双击Button1,在事件里面添加如下代码
procedure TForm1Button1Click(Sender: TObject);
var
DatabasePath: string;
begin
DatabasePath:= ExtractFilePath(ApplicationExeName) + 'Datamdb';
with ADOQuery1 do
begin
ConnectionString:= 'Provider=MicrosoftJetOLEDB40;Data Source=' +
DatabasePath + ';Persist Security Info=False';
SQLClear;
SQLAdd('SELECT FROM TableMain');
Open;
end;
end;
自己改一下数据库名和SQL语句就可以实现返回数据库中相应数据的目的了。
以上就是关于Delphi 中怎么用ADO连接数据库全部的内容,包括:Delphi 中怎么用ADO连接数据库、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)