为什么只删除奇数行

Question

为什么只删除奇数行
ADOTable1.First;
 with ADOTable1 do
    while not Eof do
      begin  
          Delete;
          Next         
      end;//只删除奇数行，不删除偶数行，如果把Delete 和Next互换
//才能删除全部记录，为什么

Answer 1

那当然是了，因为Delete;就是删除当前记录，然后自动定位到下一条！
我认为你用不着Next！

Answer 2

是的，Next是多余的，你每次都删除当前行，当然可以全部删除掉了！

Answer 3

是的，Next是多余的:嚴重同意

Answer 4

ADOTable1.First;
 with ADOTable1 do
    while not Eof do
      begin  
          Delete;
//这句拿掉就OK---> Next         
      end;