RAD Studio 12 Athens – как разархивировать зашифрованный zip-файл? ⇐ C++

[Anonymous]

У Embarcadero есть следующий пример извлечения зашифрованного zip-файла:
System.Zip.TZipFile.Extract

Код: Выделить всё

...
std::unique_ptr myZipFile(new TZipFile);
myZipFile->OnCreateDecompressStream = OnCreateDecompressStream;
myZipFile->ExtractAll("../../");
myZipFile->Close();
...

Код: Выделить всё

TStream* __fastcall TForm2::OnCreateDecompressStream(TStream* const InStream, TZipFile* const ZipFile, const TZipHeader &Item, bool IsEncrypted)
{
try
{
if (IsEncrypted)
{
// Perform decrypt operation on AInStream. For example, you can use your own implementation of CryptZip or AES-256.
// return DecryptedStream;
}
else
{
return InStream;
}
}
catch (Exception &e)
{
return InStream;
}
}

Как видите, при расшифровке зашифрованного zip-файла не хватает огромного количества информации. Это не дает никаких подробностей о том, как определить, каким методом был зашифрован zip-файл, чтобы можно было выполнить соответствующее дешифрование.
Есть ли какие-либо примеры кода, который должен быть помещен в этот раздел для расшифровать файл?
Предпочтителен C++, но даже пример Delphi будет полезен.

Подробнее здесь: https://stackoverflow.com/questions/791 ... d-zip-file