ZipDateTimeToDateTime in unit Zipper incorrectly calculates hour.
Original Reporter info from Mantis: rossperry
-
Reporter name: Ross
Original Reporter info from Mantis: rossperry
- Reporter name: Ross
Description:
//H:=(ZT shr 12) and 31;
Should be:
H:=ZT shr 11;
Steps to reproduce:
Create a test text file and zip it setting the zip entry DateTime with Time from FindFirst SearchRecord.
ZE.DateTime := FileDateToDateTime(SR.Time);
Unzip the file and check its properties, you will see wrong Last Modified date.
Additional information:
Will create a small test app and upload.
Mantis conversion info:
- Mantis ID: 25499
- OS: Windows
- OS Build: 7
- Platform: 32 bit
- Version: 2.6.2
- Fixed in version: 2.6.4
- Fixed in revision: 26409 (#a925545b)
- Monitored by: » BigChimp (Reinier Olislagers)
- Target version: 2.6.4