Also on Free Pascal/Lazarus:

https://peazip.github.io/

I didn't know PeaZip was written in FP.