pzipdemogui.~dpr

可以压缩和解压一个文件夹（里面有多个文件）或者一个文件！

program PZipDemoGUI;

uses
  ExceptionLog,
  Forms,
  UZipDemo in 'UZipDemo.pas' {Form1},
  SciZipFile in 'ZipUnit\SciZipFile.pas',
  Zippit in 'ZipUnit\Zippit.pas',
  AmZip in 'ZipUnit\AmZip.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.