WSXDCompressUtilities1

From RiskWiki
Revision as of 06:39, 12 April 2026 by Bishopj (talk | contribs) (1 revision imported)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

WSXDCompressUtilities1 - Streaming Compression using LHA

Language: Delphi 7 - 2007


uses SysUtils, Types, Registry, Classes, complhs ;

// Compress a binary string stream into a binary array of data
function Compress(var myOutputStream : TStringStream; const DataPacket : string ) : TByteDynArray;

// Compress a binary string stream into a binary array of data
function CompressGenStream(var myOutputStream : TStringStream; const DataPacket : TStream ) : TByteDynArray;

// Decompress a binary array of data into a string
function DeCompressS(const DataPacket : TByteDynArray ) : string;

// Decompress a string into a string
function DeCompressSS(const DataPacket : string ) : string;

// Decompress a binary array of data into a binary array 
function DeCompressB(const DataPacket : TByteDynArray ) : TByteDynArray;

BackLinks