PDA

Ver la Versión Completa : Problema utilización unit System.zip


pape19
10-04-2014, 14:26:51
Buenos días. Tengo el siguiente problema con la utilización de la unit System.Zip que sirve para crear, y descomprimir un zip.

La utilizo para descomprimir la actualización que se baja desde mi programa; pero al descomprimir este .zip descargado, me CREA todos los archivos del .zip; los cuales poseen la fecha y hora IGUAL al momento de extracción. Esto es distinto a lo que pasa cuando uno descomprime un .zip normalmente, donde los archivos comprimidos, al extraerlos, conservan su fecha de creación.

Necesito, que al extraer los archivos, los mismos conserven la fecha de creación.

Este es mi código.

zip := TZipFIle.Create();
zip.Open((ExtractFilePath(ParamStr(0))) + 'lista4.zip', zmRead);
zip.ExtractAll((ExtractFilePath(ParamStr(0))) + 'data\');
deletefile(ExtractFilePath(ParamStr(0)) + 'lista4.zip');
zip.Free;

lista4.zip es el archivo que previamente descargo de mi sitio. Lo abro, extraigo, y luego elimino el zip del directorio raíz donde fue previamente descargado.

Casimiro Notevi
10-04-2014, 16:48:58
¿Y de qué componente se trata?, ¿su web?

pape19
10-04-2014, 16:51:56
Es una unit que viene con Delphi, creo que de la versión XE2 en adelante. En mi caso, utilizo delphi XE3.

http://docwiki.embarcadero.com/Libraries/XE5/en/System.Zip.TZipFile