Создать zip архив через SevenZip

[Shouldercannon]

Получается создать только 7z архив

var
  SevenZip: TSevenZip;
begin
  SevenZip := TSevenZip.Create(nil);
  try
    SevenZip.AddOptions := [AddRecurseDirs];
    SevenZip.AddRootDir := ExtractFilePath(Application.EXEName) + 'test';
    SevenZip.LZMACompressStrength := NORMAL;
    SevenZip.SZFileName := 'test.7z';
    SevenZip.Files.Clear;
    SevenZip.Files.AddString(ExtractFilePath(Application.EXEName) + 'test\*.*');
    SevenZip.Add;
  finally
    SevenZip.Free;
  end;

Если вместо 7z написать zip, то после создания архива его нельзя открыть: Неизвестный формат или ошибка в архиве.
Помогите решить эту проблему.

[Пепел Феникса]

как я почитал он и делает 7z архивы.

[Shouldercannon]

Получается, что 7-Zip архиватор не имеет никакого отношения к компоненту SevenZipVCL 0.7.4a для Delphi?

[Человек_Борща]

алгоритм 7z и близко не стоял рядом с zip. И этим все сказано. Глупо переименовывать 7z в zip. Вы занимаетесь самообманом.

Системный WinZip открывает ваш псевдо-zip и пытается распознать шапку файла, и не распознает т.к. это не zip архив, а следовательно epic fail.

Если хотите zip, то вот вам очень интересное решение: http://rouse.drkb.ru/components.php#fwzip

[Shouldercannon]

ZipForge выручил.