Jenny,

Are you sure the string isn't uncompressing? If you put a breakpoint in the method you look at the values in the debugger. Label is not a good display mechanism for dynamic info you'd be better off using a ReadOnly TextBox in this case.

>I am using a third party component to compress a string in VFP6.
>
>My problem is with the Uncompression.. Here is the code that I am using:
>
>OriginalStr = "Put a long string here to allow good compression."
>UnCompressedStr = SPACE (100)
>CompressedStr = ""
>
>THISFORM.ZipMain.StringCompress (@OriginalStr, @CompressedStr)
>THISFORM.ZipMain.StringUnCompress (@CompressedStr, @UnCompressedStr)
>
>THISFORM.Label8.caption = TRIM(UnCompressedStr)
>
>The compression works fine, but when uncompressing I get an empty string in return when in fact I should be returned the Original string. The methods work fine in VB6 as well as in Delphi.
>
>If there is anybody that can help me or needs more information, please let me know. Thanks
>
>Jenny