一个给表中数据排序的难题:如何在字段后加上该记录值的名次,有一个DBF格式的表,有下列字段:学号,姓名,语文,数学,总分...

Question

有一个DBF格式的表,有下列字段:学号,姓名,语文,数学,总分
1.现在要在语文字段后加上一个语文名次,数学后加上数学名次,总分后加上总分名次
2.用语文成绩在所有记录中降序后所占位置填充到语文名次字段里;
  用数学成绩在所有记录中降序后所占位置填充到数学名次字段里;
  用总分成绩在所有记录中降序后所占位置填充到总分名次字段里.
3.修正名次记录,如果分数相同,使其名次也相同,例如:
  学号-姓名-语文-语文名次
  301 -张三-86  -1
  302 -李四-85  -2
  303 -王二-85  -2
  304 -赵六-84  -4
  305 -田七-83  -54.需要的最后结果是生成报表,名次只在报表中显出来就行,
  不一定非得修改数据库结构和记录.哪位同志帮我这个忙,研究下实现方法, 要用到什么组件,程序如何编写?

Answer 1

问题是如何做
我是这样做的,虽然能完成任务,但是速度却很慢,无法忍受
i:integer;
adotable1.sort:='总分';
for i:=0 to adotable1.recordcount -1 do
  begin
    adotable1.fieldbyname('名次').asinteger:=adotable1.recno;
    adotable1.next
  end;
如何提高执行速度,能不能用一句SQL来实现呀?
望高手指点一二