como empaquetar las tablas Dbase
Hola, tengo tablas en DBase, en la cual elimino registros e inserto, de forma normal, cunado borro registros, estos se borran logicamente pero no fisicamente.
como puedo empaquetar (creo que se llama así) dicha tabla para quitar fisicamente los registros borrados |
Hola:
Este código está tomado de "La Cara oculta de Delphi 4", pg 583, autor Ian Marteens: procedure PackDBF (const ADatabase, ATable:String); begin With TTable.Create(nil) do TRY DatabaseName := ADatabase; TableName := ATable; Exclusive := True; Open; Check (DbiPackTable(Database.Handle, Handle,'','',TRUE)); FINALLY Free; END; end; la función DbiPackTable necesita que tengas declarada la unit dbiProcs Saludos |
La franja horaria es GMT +2. Ahora son las 11:37:35. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi