delphi数据库中如何实现查找下一个

来源:百度知道 编辑:UC知道 时间:2024/07/02 22:47:37
我想在dbgrid组件中,查找指定的值,将光标移动到找到的值上,并实现查找下一个的功能。如:age字段中,有3个记录值是40,我想一个一个的找出来,但dbbrid组件中的内容要保持原样。
不管是BDE,ADO,还是dbpress组件,都提供Locate、Lookup、findkey、过滤器、SetRange等方法查找数值,
locate,lookup、findkey方法只能找到相符的第一个值。
过滤器和setrange又是一次性的将所有相符的值找出来。
均不能实现查找下一个的功能。

请高手指教。

假设这个表是TStu.里面有age字段且假设有三个40的值
方法如下:
通过select语句查出这三个记录后
,可以借用一个记录集dstemp,把这三个字段的关键字段和age字段存入dstemp中,
每次点"下一个",把dstemp中的记录向后移动(dstemp.next) ,然后区出 dstemp中的关键字段从表TStu中定位你需要的表记录.