我是一个Delphi初学者,有一个客户信息管理系统,我想实现他的客户信息查询功能:例如当输入客户姓名时出现客户的详细信息。     请高人给写个例子,最好详细一点,(加点注释,像数据库怎么连接设置,我采用的是access)
                    
谢谢了!!

解决方案 »

  1.   

    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中显示
      

  2.   

    建议先看一下delphi自身的例子
      

  3.   

    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技术宝典,这个是入门的最好书。
    看看就会明白的,再就看“万一的博客”上看一些相关的例子。