怎么实现数据信息的查询?
如何实现数据信息的查询??
我是一个Delphi初学者,有一个客户信息管理系统,我想实现他的客户信息查询功能:例如当输入客户姓名时出现客户的详细信息。
请高人给写个例子,最好详细一点,(加点注释,像数据库怎么连接设置,我采用的是access)
谢谢了!!
------解决方案--------------------
Strfile:=extractfilepath(application.exename)+'\aa.mdb'; ///设置数据库的路径
ADOConnection1.Connected:=false;
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+Strfile+';Persist Security Info=False'; //连接串
ADOConnection1.Connected:=true;
//////////查询 添加个 text 控件
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
Str:='select * from 表 where 客户姓名 like ''%'+name.text+'%'' '; //////模糊查询
ADOQuery1.SQL.Add(Str);
ADOQuery1.Open;
添加 DataSource1,DBGrid1 控件 设置属性
DataSource1.DataSet:=ADOQuery1;
DBGrid1.DataSource:=DataSource1;
查询结果将在 dbgrid中显示
------解决方案--------------------
Strfile:=extractfilepath(application.exename)+'\aa.mdb'; ///设置数据库的路径
ADOConnection1.Connected:=false;
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+Strfile+';Persist Security Info=False'; //连接串
ADOConnection1.Connected:=true;
//////////查询 添加个 text 控件
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
Str:='select * from 表 where 客户姓名 like ''%'+name.text+'%'' '; //////模糊查询
ADOQuery1.SQL.Add(Str);
ADOQuery1.Open;
添加 DataSource1,DBGrid1 控件 设置属性
DataSource1.DataSet:=ADOQuery1;
DBGrid1.DataSource:=DataSource1;
查询结果将在 dbgrid中显示
这是一个简单的例子,你可以看一下明日科技发的那个DELPHI技术宝典,这个是入门的最好书。
看看就会明白的,再就看“万一的博客”上看一些相关的例子。
我是一个Delphi初学者,有一个客户信息管理系统,我想实现他的客户信息查询功能:例如当输入客户姓名时出现客户的详细信息。
请高人给写个例子,最好详细一点,(加点注释,像数据库怎么连接设置,我采用的是access)
谢谢了!!
------解决方案--------------------
Strfile:=extractfilepath(application.exename)+'\aa.mdb'; ///设置数据库的路径
ADOConnection1.Connected:=false;
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+Strfile+';Persist Security Info=False'; //连接串
ADOConnection1.Connected:=true;
//////////查询 添加个 text 控件
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
Str:='select * from 表 where 客户姓名 like ''%'+name.text+'%'' '; //////模糊查询
ADOQuery1.SQL.Add(Str);
ADOQuery1.Open;
添加 DataSource1,DBGrid1 控件 设置属性
DataSource1.DataSet:=ADOQuery1;
DBGrid1.DataSource:=DataSource1;
查询结果将在 dbgrid中显示
------解决方案--------------------
Strfile:=extractfilepath(application.exename)+'\aa.mdb'; ///设置数据库的路径
ADOConnection1.Connected:=false;
ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+Strfile+';Persist Security Info=False'; //连接串
ADOConnection1.Connected:=true;
//////////查询 添加个 text 控件
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
Str:='select * from 表 where 客户姓名 like ''%'+name.text+'%'' '; //////模糊查询
ADOQuery1.SQL.Add(Str);
ADOQuery1.Open;
添加 DataSource1,DBGrid1 控件 设置属性
DataSource1.DataSet:=ADOQuery1;
DBGrid1.DataSource:=DataSource1;
查询结果将在 dbgrid中显示
这是一个简单的例子,你可以看一下明日科技发的那个DELPHI技术宝典,这个是入门的最好书。
看看就会明白的,再就看“万一的博客”上看一些相关的例子。