我想在一个edit控件里面的字变化以后,在DBGrid里面显示的信息指针就指向查找到与edit1.text相同的name 字段的那条纪录。
以下是我的代码:
//search为edit控件
procedure Tmainfrm.searchChange(Sender: TObject);
begin
        DMopenbook.DataModule1.ADOQuery1.First;
        while not DMopenbook.DataModule1.ADOQuery1.Eof do
        begin
          if DMopenbook.DataModule1.ADOQuery1.FieldByName('name').AsString<>search.Text then
            DMopenbook.DataModule1.ADOQuery1.Next;
        end;
end;
如果不等于则next,如果等于了呢?怎么退出while循环?