tlist怎么查找record中mc为1的记录(20分)

J

jgame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-07

• #1

type
pmydata= ^mydata
mydata = record
xh:integer;
mc:string;
ms:string;
end;



tlist怎么查找record中mc为1 的记录???
用tstringlist的话, indexof('1') 就可以定位了...这个不知道怎么查找..
请高手指教.

 

S

skyccf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-07

• #2

for i:=0 to count do
if pmydata^.mc='1' then
//finded

 

D

dey-999

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-07

• #3

这个比较难,最多你将该TList排序,一般是循环:
A:TList;Bmydata;
for i:=0 to A.Count-1 do begin
B:=pmydata(A);
if B.mc='1' then Break;//找到了
end;

 

J

jgame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-07

• #4

看样子用 tlist不合适...
不知道有没有合适的方案...合适快速查找.. 记录中的任一列的值 以定位..??

 

J

jgame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-07-07

• #5

多人接受答案了。