請教問題入下 在ado 中要刪除某一table內全部資料但是都只有刪除一半而已 迴圈寫法如下 dm.ADoQuyCust.First; while not dm.ADoQuyCust.eof do begin j := J 1; dm.ADoQuyCust.Delete; dm.ADoQuyCust.next; end; //-- 迴圈跑完後原a,b,c,d 四筆最後剩下b,d 二筆 資料不是逐筆往下移動嗎 怎會間隔移動?

您好﹗    修改成如下試試﹕

begin
  dm.ADoQuyCust.First;
  while not dm.ADoQuyCust.eof do
  begin
    dm.ADoQuyCust.Delete;
  end;
end;

================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

------
忻晟

dear kevin7382: 其實問題發生在....next 你想想第一筆資料殺掉了資料會停在那,答案是第二筆, 你又next那就去第三筆了呀,殺了第三筆在next就結束了呀 所以會剩,bd兩筆。 所以只要拿掉你的next程式就會正常了!!

引言: 您好﹗ 修改成如下試試﹕

begin
  dm.ADoQuyCust.First;
  while not dm.ADoQuyCust.eof do
  begin
    dm.ADoQuyCust.Delete;
  end;
end;

================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================

可以了 謝謝啦