Seite 1 von 1

Problem beim entpacken

Verfasst: 18.04.2018 10:55
von fabulouspaul
Hallo Gemeinde,

ich bin nicht sicher, ob Bug oder Feature:

Code: Alles auswählen

EnableExplicit

UseZipPacker()

Enumeration
  #zip_handle
EndEnumeration

Global *buffer

OpenPack(#zip_handle, "Test.zip")
ExaminePack(#zip_handle)
While NextPackEntry(#zip_handle)
  If PackEntryType(#zip_handle) = #PB_Packer_File And PackEntrySize(#zip_handle) > 0
    Debug "Dateiname vor entpacken: " + PackEntryName(#zip_handle)
    
    *buffer = AllocateMemory(PackEntrySize(#zip_handle))
    UncompressPackMemory(#zip_handle, *buffer, PackEntrySize(#zip_handle), PackEntryName(#zip_handle))   ; <- Macht Fehler
    ; UncompressPackMemory(#zip_handle, *buffer, PackEntrySize(#zip_handle))   ; <- Macht keinen Fehler
    FreeMemory(*buffer)
    
    Debug "Dateiname nach entpacken: " + PackEntryName(#zip_handle)
  EndIf
  
Wend
ClosePack(#zip_handle)
End
Gibt man beim Entpacken also den optionalen Namen der zu entpackenden Datei an, kann man danach diesen Namen mit PackEntryName() nicht mehr auslesen.
Lässt man den Namen beim Entpacken weg, ist alles wie erwartet.

Muss das so?