DeCompressMem

Синтаксис

Function DeCompressMem(Byref BUF_COMPRESSED As Byte Ptr,byval SIZECOMPRESSED As Long,ByRef BUFDESTDATA As Byte Ptr) As Long

Описание

Позволяет разархивировать память, сжатую с помощью функции CompressMem. Возвращает размер распакованной памяти.

Параметры

BUF_COMPRESSED - Адрес сжатого буфера, который надо распаковать

SIZECOMPRESSED - Размер сжатого буфера

BUFDESTDATA - Адрес буфера приемника (может быть размером таким же как сжатый, все равно в функции выравнивается до нужного)

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As Byte Ptr sourse=Allocate(10000005),Dest= Allocate(10000)
Dim As Integer sizeCompress
For a As Integer=1 To 10000000
Poke  sourse+a, a
Next
sizeCompress=compressMem(dest,sourse,10000000)
? sizeCompress
? decompressMem(dest,sizeCompress,sourse)
Sleep
DeAllocate(sourse):DeAllocate(dest)

Результат

39123
10000000

Created with the Personal Edition of HelpNDoc: Easily create HTML Help documents