TZIpFile Komprimierung

[API]

TZIpFile unterstützt diese Komprimierungen.

Wenn TZipCompression.zcLZMA verwendet wird, erscheint diese Meldung:

Zitat:

Support for compression method not registered: LZMA.

(D 10.3)

Mein Testcode:

Delphi-Quellcode:

uses 
   System.Zip;
   
procedure TForm1.zipClick(Sender: TObject);
const
  f = 'c:\irgendwas.zip'; // output file
  v = 'C:\temp' // Ordner, welcher komprimiert werden soll.
var
  myZipFile: TZIpFile;
begin

  if FileExists(f) then
  begin
    TFile.Delete(f);
  end;

  myZipFile := TZIpFile.Create;
  myZipFile.Open(f, TZipMode.zmWrite);
  myZipFile.Close;
  myZipFile.Free;

  TZIpFile.ZipDirectoryContents(f, v, TZipCompression.zcLZMA);

end;

Zusatzfrage: Welche Komprimierung verwendet Windows (10) ?