[vick]

QUE TAL

Me Gustaría saber si alguien sabe la razón del porqué el código de más
abajo me genera el error Corrupt Index Index:C:\Tablas\Reg_Deprec_Aux.
Reg_Deprec_Aux es el nombre de mi tabla creada en Paradox 7 para delphi5

Mi intención con el código de abajo es eliminar todos los registros
que posee la tabla, al salir o cerrar una forma.

si alguien sabe porque me genera ese error agradecería su ayuda, de igual
manera si alguien conoce otra forma de hacer lo mencionado, se los agradezco.

El código es:

Código Delphi [-]
procedure Limpiar_Tabla_Reg_Dep_Aux; //Elimina todos los registros de la tabla REg_Deprec_Aux
 Var
   v:Integer;
 Begin
   If (Modulo_Datos.TblReg_Deprec_Aux.IsEmpty=False) Then
   Begin
     Modulo_Datos.TblReg_Deprec_Aux.First;
     For v:=1 to Modulo_Datos.TblReg_Deprec_Aux.RecordCount do
       Modulo_Datos.TblReg_Deprec_Aux.Delete;
   End;
 End;

¡SALUDOS HASTA LUEGO!