使用Delphi XE2遇到的TZipFile問題

最近使用七月份開推出的Delphi XE2在修改使用Delphi 6撰寫的舊程式，要將程式由Win32平台修改成Win64，跟Delphi升級後必然會遇到的問題一樣：找不到符合的第三方程式庫可以使用，我們程式使用了VCLZIP來壓縮與解壓縮ZIP檔，但VCLZIP早就沒有維護了，當然也不會有64位元的版本。剛巧XE2內建了原生的ZIP處理類別TZipFile，因此就將VCLZIP的程式修改為TZipFile的版本。

但，好事多磨－主機上以Java產生的ZIP檔使用TZipFile只會解出0 Byte的檔案，追蹤程式後認定是TZipFile的Bug，同事也找到了這個Bug report：TZipFile: zip extracted with 0-size files. ，XE2的update2與最新的update 3都沒有修正這個問題。最好只好自己先修改TzipFile所在的System.zip.pas了。

＃＃

您可能也會有興趣的類似文章

• Delphi 24歲了… (0則留言, 2019/02/15)
• [Tools] 為硬碟做健康檢查：HDDlife; 硬碟測試：HD_Speed、HD Tune (0則留言, 2005/03/18)
• 萬用影音轉檔程式：FFMpeg與HD專用的VideoConverter (0則留言, 2009/05/10)
• [2011/05/04 長灘島之旅第一天] 陸海空交通大作戰 (5則留言, 2011/05/10)
• Xuite樣式研讀攻略！ (1則留言, 2005/06/04)
• Excel讀取UTF-8編碼的CSV檔，中文變亂碼的簡單解法 (5則留言, 2012/06/17)
• [2011/05/06 長灘島之旅第三天] 水上活動日 (0則留言, 2011/05/11)
• es+fzf：超快速找檔神器－用Everything Search的命令行es.exe，整合fzf的模糊搜尋；WSL也能使用！ (0則留言, 2020/03/14)
• QNAP TS-109 NAS韌體2.0更新：變更BT程式 (0則留言, 2008/02/11)
• [AHK＃58] 擷取豆瓣電影網的超簡單AutoHotkey爬蟲腳本程式 (0則留言, 2023/03/04)
• 依檔案日期刪除檔案的工具：Delete Files By Date (0則留言, 2010/09/18)
• [JR02] 用 Jaspersoft Studio 製作COVID-19統計報表，Step by step (0則留言, 2021/05/30)
• 超級起手式－兼具效率與彈性的程式啟動器FARR (0則留言, 2008/08/16)
• 超快速搜檔工具Everything功能更新，能用正規運算式找檔了 (0則留言, 2013/06/28)
• [iReport] Text Field中引用的欄位、變數與參數 (0則留言, 2005/04/16)