borrar todos los registros de un tabla

[Giniromero]

Hola,

Necesito saber como hacer para borrar todos los registros que tengo de una tabla, desde la aplicación que estoy creando.

Quiero que se borre justo al terminar de imprimirse un report que tira de ella.

Lo he intentado con un

While not TbTabla.Eof Do BEgin
TbTabla.Delete;
TbTabla.Next;
end;

en el FormClose, pero no me funciona.

Alguna idea?

Gracias,

Virginia

[Descendents]

a traves de una sentencia sql, lo has probado?

delete from tabla

Saludos

[Descendents]

Otra cosa.

Has mirado porque no te funciona lo que haces?

¿te borra algunos registros y otros no, o no hace nada?
¿has hecho un debugger haber donde da error ,si entra o si no entra o que es lo que pasa?

Si te borra unos registros y otros no.Puede ser que te falta un

Tabla.first

[[Lepe]]

TTAble.EmptyTable

y en cuanto a tu codigo:

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

[Giniromero]

Hola,

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.

creo que tienes razón, a sido instintivo lo de poner next, y claro, como son muchos registros, aunque borrase alguno, yo no lo notaba, y como usando los break se veía que si entraba en el while... pos no me daba cuenta del error ... bueno, en cualquier caso, gracias a tu ayuda ya está solucionado.

Saludos a todos,

Virginia