delphi ªº¦A¬d¸ß??

[Wen]

==> 在 charis <g871304. 的文章中提到:
: 請問::
: 在查詢上可以用findkey及findnearest兩個method但是若是
: 我想查詢的是有重複的(也就是有多人都有的一筆資料);該如何做??
: 因為我想做的是::
: 例如::
: 所有"興趣=籃球"的人將之列印出來!!
: 用findkey則若是查詢失敗,pointer是不動的!!
: 用findnearest則查詢保證一錠會成功,但是也是無法往下再查詢!!
: 請有經驗的人告知!!
: ps::請直接mail給我謝謝您!!

ans: 在 findkey or findnearest method 下找到以後用 while or repeat...until
判斷是否和 finkey or findnearest 找到的資料相同,若不同則已沒有同的資料了,
否則,則還有相同的資料,繼續到下一筆去找.

while ((not Table1.eof) and (t1=FieldByName('Field'))
begin
:((
:
:

t1=FieldByName('Field');
t1=FiledByName('FieldByName');
Table1.Next;
end;