程式中全部的欄位設定為true,有5000筆記錄,很慢,請教正確的方法. Table1.First; while not Table1.Eof do begin if not Table1xz.Value then begin if not (Table1.State In [dsEdit,dsInsert]) then Table1.Edit; Table1xz.Value:=true; end; Table1.Next; end;

改用下 SQL 的方式: 'UPDATE 表格名 SET XZ=true'

謝謝Brian77的熱情回答.我的表達可能不完善,程式要求在click SAVE 後才update資料庫,所以設Table的CachedUpdates=true.

在 Table1.First 之前先下 Table1.DisableControls 在 Update 後, 再下 Table1.EnableControls 這樣可以免除 Table1.Next 時各資料感測元件的互動, 大幅提升速度

速度改善不明顯。速度先快後慢,追後為1秒/條.