首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么实现数据信息的查询?

2012-03-16 
如何实现数据信息的查询??我是一个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技术宝典,这个是入门的最好书。
看看就会明白的,再就看“万一的博客”上看一些相关的例子。

热点排行