官网已经找不到了。
这个地址比较新
https://github.com/zedalaye/d7zip
在这个基础上 融合了
SevenZip.pas BUG修改版 - 20160613 - 堕落恶魔 - 博客园
https://www.cnblogs.com/hs-kill/p/3876160.html
然后再加了一些小的修改。

最后，提供一个比较全面的 例子。
【Delphi】从内存读取或解压压缩文件（RAR、ZIP、TAR、GZIP等）（一） - 峋山隐修会 - 博客园
http://www.cnblogs.com/caibirdy1985/archive/2013/05/13/4232949.html
【Delphi】从内存读取或解压压缩文件（RAR、ZIP、TAR、GZIP等）（二） - 峋山隐修会 - 博客园
http://www.cnblogs.com/caibirdy1985/archive/2013/05/14/4232948.html



7-zip Delphi API
This API use the 7-zip dll (7z.dll) to read and write all 7-zip supported archive formats.

- Autor: Henri Gourvest <hgourvest@progdigy.com>
- Licence: MPL1.1
- Date: 15/04/2009
- Version: 1.2

Reading archive:

Extract to path:
解压到目录：
with CreateInArchive(CLSID_CFormatZip) do
begin
   OpenFile('c:\test.zip');
   ExtractTo('c:\test');
end;

Get file list:
获取文件列表:
with CreateInArchive(CLSID_CFormat7z, 'Formats\7z.dll') do
begin
   OpenFile('c:\test.7z');
   for i := 0 to NumberOfItems - 1 do
   if not ItemIsFolder[i] then
      Writeln(ItemPath[i]);
end;

Extract to stream
解压到流:
with CreateInArchive(CLSID_CFormat7z)