Comprimir archivos con turbo power abbrevia

[[white_zombie]]

Hola a todos, tengo un problema al comprimir archivos con abbrevia y es que al añadir los archivos al .zip me añade no solo los archivos sino todas las carpetas de la ruta que escribo.
El codigo no es exactamente este, pero como ejemplo vale:

Código Delphi [-]
 procedure TForm1.Button2Click(Sender: TObject);
 var
    AbZipKit: TAbZipKit;
  begin
    AbZipKit := TAbZipKit.Create(Self);
    try
      AbZipKit.FileName := 'c:\copia.zip';
      AbZipKit.StoreOptions := [soRecurse];
      abzipkit.CompressionMethodToUse:=smBestMethod;
      abzipkit.DeflationOption:=doMaximum ;
      AbZipKit.AddFiles(C:\Documents and Settings\Usuario\Mis documentos\config.ini, faAnyFile );
      AbZipKit.CloseArchive;
      AbZipKit.Save;
    finally
      AbZipKit.Free;
      showmessage('Operacion Completada');
    end;
  end;

Por si no me he explicado bien, lo que pasa es que añade el fichero config.ini pero dentro de las carpetas Documents and Settings\Usuario\Mis documentos.
Lo que quiero saber es como se puede hacer para que me añada el archivo pero sin las carpetas.

Gracias por adelantado por las posibles respuestas.

[dec]

Hola,

Bienvenido a estos Foros. Revisa, por favor, la guía de estilo de los mismos, porque, probablemente, te ayudará para sucesivas cuestiones que se te ocurra plantear. Respecto de tu pregunta, la "cosa" está en la línea:

Código Delphi [-]
AbZipKit.StoreOptions := [soRecurse];

¡Con ella estás indicando, precisamente, que se añadan al "Zip" las subcarpetas "recursivamente"!

Nota: Fíjate cómo he editado tu mensaje para encerrar el código Delphi entre las etiquetas [ DELPHI ] y [ /DELPHI ], para que, como puedes ver, el código se muestre debidamente formateado y aun algos más.

[[white_zombie]]

Muchas gracias, tienes razon ese era el fallo ya lo he cambiado.

Gracias por la ayuda.

[[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.