Código:
TTAble.EmptyTable
y en cuanto a tu codigo:
Código:
While not TbTabla.Eof Do BEgin
TbTabla.Delete;
end;
Lo que sobra es el Next, ya que al borrar un registro, el cursor se queda en el registro anterior de la tabla, por tanto, da igual si está posicionado al principio, al final o en medio.
Saludos