Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Delphi ActiveX) Open a Zip ArchiveSee more Zip ExamplesDemonstrates how to open a zip, or an encrypted .zip, or a legacy password-protected .zip.
uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_v9_5_0_TLB; ... procedure TForm1.Button1Click(Sender: TObject); var zip: TChilkatZip; success: Integer; begin zip := TChilkatZip.Create(Self); // Open a non-encrypted .zip success := zip.OpenZip('qa_data/zips/sample.zip'); if (success <> 1) then begin Memo1.Lines.Add(zip.LastErrorText); Exit; end; Memo1.Lines.Add('Num entries = ' + IntToStr(zip.NumEntries)); // ... // ... zip.CloseZip(); // ---------------------------------------------------------------------------- // Open an encrypted zip... // The two main types of encryption used in ZIP archives are Password-Protected and AES. // // --------------------------------------- // 1. Legacy Password-Protected Zip // // This is the older and less secure method of encrypting ZIP archives. // It provides a basic level of security, but is considered weak by modern standards. // It is vulnerable to various attacks, including known-plaintext attacks and brute force attacks. // Although Chilkat allows it, you shouldn't create new zip archives using legacy password-protection. // --------------------------------------- // 2. AES Encrypted Zip // // AES encryption is a more modern and secure method for encrypting ZIP archives. // It provides strong encryption based on the AES algorithm, which is widely regarded as secure. // AES supports different key lengths, typically 128-bit, 192-bit, and 256-bit. // When opening an encrypted zip, your application only needs to provide the correct password. // The information about the type of encryption and the key length (if AES) is already embedded within the encrypted .zip. // Provide the decrypt password because we are opening an existing .zip (decrypting) zip.DecryptPassword := 'thePassword'; success := zip.OpenZip('qa_data/zips/encryptedSamples/ziptest_256.zip'); if (success <> 1) then begin Memo1.Lines.Add(zip.LastErrorText); Exit; end; Memo1.Lines.Add('Num entries = ' + IntToStr(zip.NumEntries)); // ... // ... zip.CloseZip(); end; |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.