on dirait qu'il y a un bug sur lib zip/pack :
Code : Tout sélectionner
file$ =OpenFileRequester("Open zip","","All|*.*",0)
If file$ <> ""
UseZipPacker()
pack = OpenPack(0, file$, #PB_PackerPlugin_Zip)
Debug pack ; should be = 1
EndIf
Chez moi, en ouvrant un simple zip compressé avec windows (ou avec purebasic), j'ai toujours 0 comme debug.