//用 Filter 功能吧,然后DBGrid中就会显示过滤后的数据. //根据EDIT1文本框的输入改变,使得记录集改变,过滤到你想要的结果.procedure TfrmSearch.Edit1Change(Sender: TObject); var str1:string; begin Str1:='itemno like '+''''+Trim(Edit1.Text)+'%'+''''; if trim(edit1.Text)='' then begin AQuery1.Filtered:=False; exit; end; AQuery1.Filtered:=False; AQuery1.Filter:=Str1; AQuery1.Filtered:=True; end;
http://community.csdn.net/Expert/topic/4160/4160334.xml?temp=.1911585
中 offee36(咖啡) 这样说到楼主的效果是要用HINT来显示。
不如用个DBGRID来模糊查询,然后用API把DBGRID显示在EDIT下面---------------------------------------------------------------------
但不知道有没有例子,这个东东没做过,,哪位有例子,,望贴出来一下,谢谢
自己尝试写写吧
养成依赖的习惯
做不了好programer
操作SQL语句,再到DELPHI中写就是了!
//根据EDIT1文本框的输入改变,使得记录集改变,过滤到你想要的结果.procedure TfrmSearch.Edit1Change(Sender: TObject);
var
str1:string;
begin
Str1:='itemno like '+''''+Trim(Edit1.Text)+'%'+'''';
if trim(edit1.Text)='' then
begin
AQuery1.Filtered:=False;
exit;
end;
AQuery1.Filtered:=False;
AQuery1.Filter:=Str1;
AQuery1.Filtered:=True;
end;