[Razor12911]

Will leave this little project here.
Very simple, just use this function

function ExtractZip(ASource, AOutput: String): Boolean;

 
usage:
ExtractZip(ExpandConstant('{src}\setup.cab'),ExpandConstant('{tmp}'));