>Hello,
>
>I know this probably sounds like a stupid question but here is goes:
>
>I am try to make our component work in FoxPro6. Basically I am try to do memory compression.
>
>I have a string that I want to compress and then place in a byte array to then later on uncompress it back into a string.
>
>This is the code I am try to use...
>
>public gcBigBlob && uncompressed data
>public gcLittleBlob && compressed data (variant)
>
>gcBigBlob = "This is the string I wnat to compress"
>gcLittleBlob = ""
>
>&& Set up the compression control:
>gnZip = CREATEOBJECT('XceedSoftware.XceedCompression')
>
>&& Compress the data:
>rslt = gnZip.Compress(m.gcBigBlob, m.gcLittleBlob, .T.)
>MESSAGEBOX (gnZip.GetErrorDescription (rslt))
>
>? m.gcLittleBlob
>? LEN(m.gcLittleBlob)
>
>
>The problem is that gcLittleBlob remains empty and the string is never compressed.

If the above is the correct syntax you will have to pass the variable by reference rather than value. Make your call like this...

rslt = gnZip.Compress(m.gcBigBlob, @m.gcLittleBlob, .T.)

What is returned in rslt? The above will pass the variable by reference which assumes the Compress method will update that variable with the result you want.

BOb