Descomprimir zip con sevenzip

[Ramsay]

Hola , necesito descomprimir el zip de cualquier comprimido pero solo puedo descomprimir el zip que hago con este mismo programa.

Codigo :

Código Delphi [-]
var
  zip: I7zInArchive;
begin
        zip := CreateInArchive(CLSID_CFormat7z);
        zip.OpenFile('test.zip');
        zip.ExtractTo('/here'); 
end;

Si lo intento con un comprimido zip cualquiera me devuelve como error "Funcion incorrecta" , ¿ como puedo descomprimir cualquier comprimido con sevenzip ?