Delphi - DESCOMPRIMIR ZIP

Hola, he creado un proceso que me comprime ciertos registros de unas bases de datos y ahora necesito descomprimir por código ese fichero zip que me genera, es decir seleccionar el archivo zip que tengo y que al darle a un botón me descomprima en alguna carpeta lo que tiene el fichero zip, Utilizo delphi 5, Gracias