5

私はdelphi7を使用しており、複数のファイルを含む圧縮zipファイルを解凍する必要があります。ZLibを使用して単一のファイルを解凍する方法の例を見つけましたが、zip内の複数のファイルでこの例を見つけることができません。誰かが私に例を与えるか、私を1つの方向に向けます

ありがとう

コリン

4

2 に答える 2

13

zlib に問題がある場合は、TurboPower の Abbrevia ( SourceForgeで入手可能) を検討することをお勧めします。Abbrevia を使用すると、複数ファイルの抽出コードは次のようになります。

zip.ArchiveType := atZip ;
zip.ForceType := true ;
zip.OpenArchive({...your .zip archive name});

zip.BaseDirectory :=  {...your extract path...} ;
zip.OnConfirmOverwrite := Overwrite
zip.ExtractFiles('*');

抽出の失敗、上書きの確認などを処理するオプションがあります。これは、操作するのに非常に優れたライブラリであり、無料です。

于 2012-05-16T15:44:10.840 に答える
2

zlib.netの zlib ソース配布に例があります。contrib/minizip/miniunz.cを見てください。

于 2012-05-16T19:36:42.097 に答える