Почему не удаляет последнюю запись?

← →
Geugenk (2003-10-11 16:00) [0]

Table1.first;
While not Table1.eof do begin
Table1.delete;
Table1.Next;
end;

← →
Nikolay M. © (2003-10-11 16:03) [1]

Это ты так таблицу чистишь?! Орел ты наш... :))
Про Table.EmptyTable или DELETE FROM table_name слышал что-нибудь?

← →
Geugenk (2003-10-11 16:07) [2]

Спасибочки умник
но я не чищу!
По очереди выбираю записи, кое-что изменяю и посылаю в другую таблицу. Те которые я отослал надо сразу удалять.
Все работает, но с последней записсю не хочет

← →
Geugenk (2003-10-11 16:15) [3]

Это просто я так упростил для примера

← →
Hooch © (2003-10-11 16:29) [4]

Next убери

while not Table1.Eof do
if <Некое_условие> then Table1.Next else Table1.Delete;

← →
Geugenk (2003-10-11 17:05) [6]

Спасибо!

Почему не удаляет последнюю запись? Найти похожие ветки