FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
table.delete, pero no reduce tamaños tablas
Buenas tardes, tardes!
me pasa algo curioso. Tengo un par de tablas relacionadas, de las que quito unos cuantos registros, dependiendo de la variable indice pasada como parametro. El borrado lo hace bien en ambas tablas (tengo menos registros en ambas), pero el tamaño de los ficheros no decrece, que es preecisamente lo que buscaba al borrar registros. ¿Me puede alguien explicar el porque? ¡¡Gracias!! Código:
procedure TForm1.clarear(indice:integer); begin table2.Open;table2.First; table3.open;table3.First; table2.edit;table3.edit; while table2.Fieldbyname('Id').asinteger < indice do begin while table3.FieldByName('Id').asinteger = table2.FieldByName('Id').asinteger do begin table3.Delete; end; table2.Delete; end; table2.close; table3.close; end; |
#2
|
|||
|
|||
Aunque no especificas que gestor de base de datos usas, te puedo decir que el decremento del tamaño del archivo de la base de datos se ve cuando se produce el compactado de la base de datos (que es realmente cuando se elimina toda la informacion inservible de la base de datos), este proceso se denomina garbagge collection.
JOSEPE Lima-Peru |
#3
|
|||
|
|||
Gracias Josepe, y perdón a todos: Uso Delphi 7 y BDE - Paradox.
No he comprendido muy bien tu respuesta, Josepe. Miro en la ayuda y solo me sale Garbage para una serie de opciones para TBackupOption. No sé si tiene algo que ver, pero no lo veo muy claro. ¿Podrías ampliar algo la repuesta por favor?. Gracias Jon |
#4
|
|||
|
|||
Perdón de nuevo a todos (tanto pedir perdón me llevará al cielo).
Buscando, buscando, me he encontrado con esta página: http://www.delphicorner.f9.co.uk/articles/db15.htm en la que me resuelve el problema. Incluyendo en uses BDE funciona de maravilla. Un saludo a todos. |
|
|
|