怎样对查询出来的新的数据，在QUERY的Query1AfterScroll事件中显示新的顺序（有难度！！）(65分)

C

chi8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-22

• #1

比如 a, b, c, d, e, f, g, h, i,
对应 1，2，3，4，5，6，7，8，9的原来顺序，用QUERY1。RECNO很容易得出顺序
查询后，有 c , d, h,3项满足条件，
可是这时还是显示其条目为： 3， 4，8（用Query1AfterScroll点击//QUERY1。RECNO）
我想要的显示是： 1， 2，3的新顺序！
当然，Label1.caption:=inttostr(TStringGrid(DBGrid1).row);不行，因为查询会返回
很多条目，对屏幕上的几项是不行的

 

C

chi8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-22

• #2

procedure TForm1.Query1AfterScroll(DataSet: TDataSet);
var
i,j:integer;
begin
i:=1;
query1.First;
for j:=1 to query1.RecNo do
begin
i:=i+1;
query1.Next;
end;
label23.caption:='i';
end;
提示有错误，好像是 溢出

 

C

chi8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-22

• #3

着急！真的没法做到？

 

C

chi8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-22

• #4

up

 

T

twos

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-22

• #5

RecNo一般是不可以用的
好像只是DBase和Paradox可以用
最好考虑其他的办法，而不要停留在RecNo上

 

S

strchi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-26

• #6

添加一个计算字段好了！

 

C

chi8

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-26

• #7

多人接受答案了。