uses System.SysUtils, System.Zip;begin try TZipFile.ExtractZipFile( 'data.zip', 'tmp'); except on E: Exception do WriteLn(E.Message); end;end.