B4A Library [B4X] Compress and decompress strings using Gzip

This is a library for compressing and decompressing strings. It uses the Gzip algorithm and can be used with B4A and B4J code.

Dim gzipUtil As GzipString
Dim gzipsource As String = "This event will be called once, before the page becomes visible."
Dim gzipBT() As Byte
gzipBT = gzipUtil.gzipCompress(gzipsource)
Dim StringDecompress As String = gzipUtil.gzipDecompress(gzipBT)

 

[Erel]

Thanks for sharing. I've changed the title tag to [B4X]. This tells the search engine that it is a cross platform resource. It is better like this even if B4i isn't supported.