为了输入方便,想实现以下功能:
类似帮助文件中的查询参数输入界面,输入参数时下方自动进行模糊搜索,金山词霸中也有着功能。
但由于刚接触Delphi不久,希望各位帮忙,谢谢!

解决方案 »

  1.   

    在ONCHANGE事件中,做一个查找.然后将匹配的数据显示出来就可以了
      

  2.   

    帮定一个数据库良数要查询显示的结果,在ONCHANGE事件中 通过sQl语句访问数据库来实现
      

  3.   

    IwantFlay(我很爱她!!!!!!!!!!)  的办法可行
      

  4.   

    在ONCHANGE事件中,这里显示结果,不要这里访问数据库
      

  5.   

    procedure Tfrom1.Edit1Change(Sender: TObject);
    begin
     if edit1.Text<>'' then
      begin
        if cpzl.Active=true then
        cpzl.Active:=false;
       cpzl.SQL.Clear;
       cpzl.SQL.Text:='select * from cpzl where CPPH like '+'''%'+edit1.Text+'%''';
       cpzl.Open;
      end;
    end;
      

  6.   

    procedure Tfrom1.Edit1Change(Sender: TObject);
    begin
     if edit1.Text<>'' then
      begin
        if cpzl.Active=true then
        cpzl.Active:=false;
       cpzl.SQL.Clear;
       cpzl.SQL.Text:='select * from cpzl where CPPH like '+'''%'+edit1.Text+'%''';
       cpzl.Open;
      end;
    end;