[rdfx]

Есть вот такой код:

Код:

Table1.First;
while not Table1.eof do begin
if Table1.FieldbyName('Num').AsString=edit1.text then Table1.Delete;
Table1.next;
end;

Почему при выполнении он удаляет не все нужные строки в таблице? Таблицы Paradox.
Заранее спасибо