Zip for delphi.
Can use:
TurboPower Abbrevia: http://sourceforge.net/projects/tpabbrevia/
or
Synzip: http://synopse.info

0. Install TurboPower Abbrevia or Synzip.
1. Copy all files from choosen dir (abbreviazip/synzip) to src.
2. Use ReadXLSX, SaveXmlssToXLSX, SaveXmlssToODFS, ReadODFS in delphi.

You can use another zip packer, just write *.inc like for Synzip/TP Abbrevia.