Comprimir archivos con turbo power abbrevia

[[white_zombie]]

Hola de nuevo, acabo de darme cuenta que no he solucionado el problema porque habia puesto esa opcion para que me añadiese tambien las subcarpetas que hay dentro le la carpeta que quiero añadir.

Con otras opciones que he probado soluciono el 1ª problema que he planteado en este hilo pero no me añaden las subcarpetas que hay dentro de la que quiero añadir.

No se si me he explicado bien con tanta carpeta y subcartepa, espero que me entiendan.

[dec]

Hola,

No entiendo bien el problema, puesto que, al principio no querías añadir las subcarpetas, y, entonces, sobraba la línea de código referida arriba, o, a lo menos, la opción "soRecurse". Pero, ahora, dices que quieres añadir las subcarpetas... con lo cual tendrías que añadir la opción que antes quitaste...

Intuyo que te estás refiriendo a cómo se descomprime el archivo "Zip", esto es, a que se "recree" el árbol de carpetas o no. Creo que en este caso la solución no está en las opciones de compresión, sino en las de descompresión. No estoy seguro ahora mismo, ni puedo mirarlo, pero, revisa las opciones de descompresión: es ahí donde puedes optar porque se "recree" el árbol de carpetas o no.

También puede ser que esté completamente equivocado con lo que vengo diciendo. Si es así mis disculpas.

[[white_zombie]]

Gracias, lo mirare a ver si es eso.

[[white_zombie]]

Hola, sigo teniendo un problema con abbrevia.

Voy a poner un ejemplo.
Quiero meter en un zip la carpeta que esta en esta ruta

C:\Documents and Settings\Usuario\Mis documentos\Mis eBooks

y para eso utilizo lo siguiente:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
 begin

       AbZipKit := TAbZipKit.Create(Self);
   try
     AbZipKit.FileName := 'C:\copia.zip';
     AbZipKit.StoreOptions := [soRecurse];
     abzipkit.CompressionMethodToUse:=smBestMethod;
     abzipkit.DeflationOption:=doNormal  ;
     AbZipKit.AddFiles('C:\Documents and Settings\Usuario\Mis documentos\Mis eBooks\*.*', faAnyFile );
     AbZipKit.CloseArchive;
     AbZipKit.Save;
   finally
     AbZipKit.Free;
   end;

 end;

La opcion soRecurse la pongo para que tambien añada al 'zip' las subcarpetas que hay dentro de mis ebooks y no solo los archivos.

Hasta aqui todo bien el problema viene que al abrir el zip me encuentro con todas las carpetas de la ruta, es decir , para llegar a Mis eBooks tengo que abrir Documents and Settings\usuario\etc...
Se que esto pasa por la opcion soRecurse pero si no la pongo y la carpeta que quiero añadir al ZIP tiene subcarpetas no me las añade.
He probado a combinarla con otras opciones o a poner otras y quitar esta pero el resultado no me sirve.

Creo que me he explicado mas o menos.
Lo que quiero es añadir una carpeta y sus correspondients subcarpetas y que al abrir el zip me salga directamente la carpeta y no que me cree las carpetas de la ruta y dentro la que he querido añadir.

Si lo que quiero es posible que alguien me lo diga y si no es asi que me lo diga tambien.

Gracias.

[dec]

Hola,

Te explicas bien, quiero decir, que, comprendo lo que tratas de explicar. Sin embargo, haciendo alguna que otra prueba, pienso que el componente tiene algún problema en este sentido: he tratado de seguir la ayuda del componente para esto que nos ocupa, pero, o no doy en el clavo, o, como digo, hay un error de implementación en el propio componente, a lo menos, ya digo, en lo que nos ocupa. No se me ocurre qué decirte salvo esto... tal vez podrías contactar con quien desarrolla estos componentes por ver si pueden echarte una mano; es posible que sea un error, como te digo, y que esté ya para subsanarse o algo así... te deseo suerte, en todo caso.

[[white_zombie]]

Hola

Gracias por la respuesta, con ella he confirmado lo que pensaba, que es un error del comoponente porque por mas que he mirado la ayuda no he visto nada para arreglarlo.

Intetare usar otra herramienta aunque esta a parte de este fallo me gustaba.

Si sabes de alguna herramienta parecida y que vaya bien te agradeceria que me la indicases.

Muchas gracias.

[dec]

Hola,

Pues sí, sí que sé de otros componentes que funcionan bastante bien, pero, si no los mencioné antes es porque son gratuitos, en su versión "personal" (mira su licencia porque no sé hasta qué punto puedes usarlo en ciertas aplicaciones) y son los componentes ZipForge. Yo los he utilizado y no me fueron mal. De todos modos, a poco que busques en páginas como Torry's Delphi Pages encontrarás otros componentes para lo que te es menester: comprimir y descomprimir archivos Zip. También en estos Foros se ha tratado este tema y se han referido componentes para estos menesteres: busca en los foros por "comprimir archivos" y palabras-clave semejantes a ver si tienes suerte.

De todos modos, hombre, yo creo que no estaría demás que escribieras en el Foro de los componentes conque lo hemos intentado primeramente, porque, muy posiblemente obtengas respuestas a la cuestión que nos preocupa. No pierdes nada y es posible que logres una solución: por mucho que hallamos probado es posible que nos pasara inadvertida la solución. En fin, por probar, ya digo que no pierdes nada en absoluto.