Componente para Compactar ficheros y carpetas

[dec]

Hola,

Yo utilizo en algún proyecto los TurboPower Abbrevia y van muy bien para comprimir en formato Zip, entre otros. La instalación es más o menos sencilla: cuentas con "paquetes" para todas las versiones de Delphi hasta la 7, pero, el paquete de esta misma versión también funciona en Delphi 2007 for Win32.

[Roilo]

Me quedo con el componente ZipForge. Gracias a todos.
Les cuento:
1-Descargué el componente.
2-Lo instalé como explicaba claramente el fichero Readme.txt incluido.
3-Abrí el Delphi.7 y coloqué el componente en mi Form, lo nombré 'compacta'.

Código Delphi [-]
 Compacta.BaseDir := Ubicacion ; //Dirección de los ficheros a compactar.
 Compacta.FileName := Fulano.Zip; //Nombre y ubicacion del fichero compactado resultante.
 Compacta.OpenArchive ; //abrir fichero
 Compacta.AddFiles ; //compactar
 Compacta.CloseArchive ; //Cerrar fichero

Además en la propiedad FileMasks especifiqué los ficheros con sus extensiones que quería compactar, y me percaté de que la propiedad options/recurse me sirve para compactar o no los subdirectorios de BaseDir.

Espero no se me halla quedado nada.
Bueno, hoy mi sistema crea salvas automáticamente, gracias a ustedes, aunque me queda conseguir otra versión del componente porque cada vez que abro Delphi me sale un cartelito haciéndome algunas recordaciones.
Felicidades, Gracias.