Problema utilización unit System.zip

[pape19]

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]

¿Y de qué componente se trata?, ¿su web?

[pape19]

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