Error al recorrer registros de tabla

[[oscarac]]

Código Delphi [-]
procedure BorrarRegistros;
begin
Form1.tbl8.First;
while Form1.tbl8.Eof = False do
begin
Form2.tbl8.Delete;
Form2.tbl8.Next;
end;
end;

me parece que debes eliminar esa linea, puesto que cuando borras un registro el puntero pasa al registro siguiente y si encima le haces un next entonces no estaria borrando todos los registros

supongo que es un ejemplo verdad? Form1.tbl8 y Form2.tbl8 ??