Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Problema utilización unit System.zip (https://www.clubdelphi.com/foros/showthread.php?t=85630)

pape19 10-04-2014 14:26:51

Problema utilización unit System.zip
 
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.

Código Delphi [-]
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/Libra...m.Zip.TZipFile


La franja horaria es GMT +2. Ahora son las 10:03:50.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi