[Файловая система] получить в переменную содержимое файла, находящегося в ZIP архиве

#include <uZip.au3>

Global $sPackage = @ScriptDir & '\KM_2000140_2013_09.zip' ;~ Имя архива.
_uZip_Startup()

$Index=0
While 1
	If _uZip_GetFileInfo($sPackage, $Index) Then ;в качестве теста получаю окно с информацией по файлу
		MsgBox(0,'GetFileInfo', 'Compressed size: ' & @TAB & @TAB & _uZip_GetCompressedSize() & @CRLF & _
		         'Compression method: ' & @TAB & _uZip_GetCompressionMethod() & @CRLF & _
		         'CRC32: ' & @TAB & @TAB & @TAB & _uZip_GetCrc32() & @CRLF & _
		         'External file attributes: ' & @TAB & _uZip_GetExternalFileAttributes() & @CRLF & _
		         'File name: ' & @TAB & @TAB & _uZip_GetFileName() & @CRLF & _
		         'IsPassword: ' & @TAB & @TAB & _uZip_GetFlag() & @CRLF & _
		         'Internal file attributes: ' & @TAB & _uZip_GetInternalFileAttributes() & @CRLF & _
		         'Size file name: ' & @TAB & @TAB & _uZip_GetSizeFileName() & @CRLF & _
		         'File date: ' & @TAB & @TAB & _uZip_GetFileDate() & @CRLF & _
		         'Uncompressed size: ' & @TAB & _uZip_GetUnCompressedSize() & @CRLF & _
		         'Version needed: ' & @TAB & @TAB & _uZip_GetVersionNeeded())
	EndIf
	$name = _uZip_GetFileName()
	if $name = '' then ExitLoop; уходим из цикла по достижении конца архива
	FileDelete($name); удаляем если уже существовал
	$data = _uZip_LoadToMemoryEx($sPackage, $name)
	FileWrite($name,$data)
	$index+=1
WEnd

#include <uZip.au3>

Global $Index = 0, $sPackage = @ScriptDir & '\KM_2000140_2013_09.zip'

_uZip_Startup()

While 1
	If _uZip_GetFileInfo($sPackage, $Index) Then
		_uZip_SaveToFile($sPackage, _uZip_GetFileName())
	    $Index += 1
	Else
		ExitLoop
	EndIf
WEnd

_uZip_Shutdown()

const $CompressedSize   = 1 ; Размер сжатого файла.
const $UncompressedSize = 0 ; Размер распакованого файла.

$dll = dllopen("AutoIt_zip.dll")
if $dll > -1 then
  $return = dllcall($dll, 'int', 'Open', 'str', 'C:\Archive.zip')
  if $return[0] <> 0 Then
	 $return = dllcall($dll, 'int', 'Enum_Start')
	 if $return[0] <> 0 Then
		
		while 1
		   $return = dllcall($dll, 'int', 'Enum_Next')
		   if $return[0] = 0 then
			  ExitLoop
		   endif
		   
		    $return = dllcall($dll, 'str', 'Enum_FileName')
			$Infa = 'Файл ' & $return[0] & chr(10) & 'Размер '
			$return = dllcall($dll, 'int', 'Enum_Size', 'int', $UncompressedSize)
			$Infa = $Infa & $return[0]
		   
		   MsgBox(0, '', $Infa, 0)	   
	    wend
     endif
	 dllcall($dll, 'int', 'Close')
  endif
  DllClose($dll)
endif

$zipfile='D:\яДиск\ZipMafaka\KM_2000140_2013_09.zip'
 $return = dllcall($dll, 'int', 'Open', 'str',$zipfile)

$return = dllcall($dll, 'int', 'Open', 'str','D:\яДиск\ZipMafaka\KM_2000140_2013_09.zip')

const $CompressedSize   = 1 ; Размер сжатого файла.
const $UncompressedSize = 0 ; Размер распакованого файла.

$zipfile=FileOpenDialog('Выбери зип',@ScriptDir,'ZIP-file(*.zip)')

$dll = dllopen("AutoIt_zip.dll")
if $dll > -1 then
  $return = dllcall($dll, 'int', 'Open', 'str',$zipfile)
  if $return[0] <> 0 Then
	 $return = dllcall($dll, 'int', 'Enum_Start')
	 if $return[0] <> 0 Then
		while 1
		   $return = dllcall($dll, 'int', 'Enum_Next')
		   if $return[0] = 0 then
			  ExitLoop
		   endif

		    $return = dllcall($dll, 'str', 'Enum_FileName')
			$Infa = 'Файл ' & $return[0] & chr(10) & 'Размер '
			$return = dllcall($dll, 'int', 'Enum_Size', 'int', $UncompressedSize)
			$Infa = $Infa & $return[0]


		   MsgBox(0, '', $Infa, 0)

			$memory = _MemGlobalAlloc ($UncompressedSize,0x0000)

			$return = dllcall($dll, 'int', 'Uncompress_Memory', 'ptr', $memory, 'int', $UncompressedSize)

;===========> КАК ТЕПЕРЬ ИЗ ПАМЯТИ ВЫДЕРНУТЬ ТО ЧТО ЛЕЖИТ ПО АДРЕСУ $memory? <======
	    wend
     endif
	 dllcall($dll, 'int', 'Close')
  endif
  DllClose($dll)
endif

Func _MemGlobalAlloc($iBytes, $iFlags = 0)
	Local $aResult = DllCall("kernel32.dll", "handle", "GlobalAlloc", "uint", $iFlags, "ulong_ptr", $iBytes)
	If @error Then Return SetError(@error, @extended, 0)
	Return $aResult[0]
EndFunc

$memory = _MemGlobalAlloc($return[0],0x0000)

            $return = dllcall($dll, 'int', 'Uncompress_Memory', 'ptr', $memory, 'int', $return[0])