problema a la hora de comprimir con abbrevia

[danielmj]

Hola casimiro, ya lo encontre, me baje un pdf de sourceforge y ya está funcionando, la forma es:

Código Delphi [-]
..
zip.FileName:= 'C:\prueba\prueba.zip';
  zip.AddFilesEx('c:\prueba\parametro1','parametro2',0);
  zip.Save;
  zip.Free;
..

La linea en rojo es la principal aquí, no sé si habrá mas formas pero de momento esta ha funcionado. A saber:
Parametro1 Sería el archivo o archivos a comprimir según su extensión. Puede ser "C:\prueba.txt" o "*.txt"
Parametro2, son los archivos que no se deben tocar igualmente según su extensión. Por ejemplo "*.pas"
El valor 0, es para indicar que no toque ninguno de los archivos distintos a Parametro1

Bueno, espero haberme explicado y si estoy equivocado en algo que me corrija.
Un saludo.