Descomprimir un archivo gzip con Delphi

[jplj]

Hola:

Buscando una forma limpia(1) de comprimir / descomprimir un archivo -si puede ser más de uno mejor, pero no imprescindible- he encontrado este post de Seaone, que realiza la primera parte: La compresión.

Quizá sea "sencillo", pero ¿cómo podría implementar la función inversa?

Decir por último que uso Delphi 7.

Muchas gracias de antemano.

(1) Limpia:
.- Sin dll externas, tal como ocurre con 7-zip
.- Sin requerir componentes extras, como abrevia, jcl, ...