PureBoard

Ne ich würde das ganze ohne I-Net machen!

php-freak hat geschrieben:Ich habe schon die ZIP Lib von gonzales gefunden allerdings Spuckt die nen Error bei:

Code: Alles auswählen

Procedure CallbackForTest(file.s, PerCent.f)
  Debug StrF(PerCent, 2) + "%"
EndProcedure
;
myFileinfo.PureZIP_FileInfo
PureZIP_SetCallback(@CallbackForTest())
;
MyZIP.s = "C:\PureBasic393\Program\PureZIP\essai1\test.zip"
MyFilesToZIP.s = "C:\PureBasic393\Program\PureBriefLZ\*.*"
MyZIPOutPut.s = "C:\PureBasic393\Program\PureZIP\essai3"
; Create archive
Debug PureZIP_AddFiles(MyZIP, MyFilesToZIP, #PureZIP_StorePathAbsolute, #PureZIP_Recursive)
; Extract files from archive
Debug PureZIP_ExtractFiles(MyZIP, "*.*", MyZIPOutPut, #True)
; Count files in archive
Debug PureZIP_GetFileCount(MyZIP)
; Add memory bank to archive
Debug PureZIP_AddMemory(MyZIP, "MemoryTest.txt", @MyZIP, Len(MyZIP))
; On file more in archive :
Debug PureZIP_GetFileCount(MyZIP)
; Get files information
For i = 0 To PureZIP_GetFileCount(MyZIP) - 1 
   Debug PureZIP_GetFileInfo(MyZIP,i , @myFileinfo)
   Debug "Number " + Str(i)
   Debug "Filename: " + myFileinfo\FileName
   Debug "Compressed Size: " + Str(myFileinfo\CompressedSize)
   Debug "Uncompressed Size: "+ Str(myFileinfo\unCompressedSize)
   Debug "--------------"
Next

Hier:

Code: Alles auswählen

PureZIP_SetCallback(@CallbackForTest())

Er sagt das es das weder eine Procedure/Macro/Linked List ist!

Dann hast du die Bibliothek in dem falschen Verzeichnis.

Ne diesmal lag der Fehler nicht bei mir sondern beim Programmier der LIB!

Er hat anstatt

PureZIP_SetProgressionCallback(@CallbackForTest())

PureZIP_SetCallback(@CallbackForTest()) genommen aber den Befehl gibts in der Lib gar ned!

php-freak hat geschrieben:Ne diesmal lag der Fehler nicht bei mir sondern beim Programmier der LIB!

@c4s: Das ist doch mal ein Signatur-Kandidat erster Kajüte.

Kiffi hat geschrieben:...mal ein Signatur-Kandidat erster Kajüte.

Gestern zuviel Bugs Bunny gesehen. Meinereiner auch.

Kiffi hat geschrieben:

php-freak hat geschrieben:Ne diesmal lag der Fehler nicht bei mir sondern beim Programmier der LIB!

@c4s: Das ist doch mal ein Signatur-Kandidat erster Kajüte.

Ach mit dem jetzigen bin ich noch ganz zufrieden

Nimm einfach 7-Zip...

Klar ich aknn auch WinRar nehmen! Aber ums selbermachen gehts hier!

php-freak hat geschrieben:Ne diesmal lag der Fehler nicht bei mir sondern beim Programmier der LIB!

Er hat anstatt

PureZIP_SetProgressionCallback(@CallbackForTest())

PureZIP_SetCallback(@CallbackForTest()) genommen aber den Befehl gibts in der Lib gar ned!

It's an old example for PB3.93 ... I forgot to update it. Fixed.
Long time ago, there was a PureZIP_SetCallback() function. Now, there are two callback functions : PureZIP_SetCompressionCallback() and PureZIP_SetProgressionCallback().

@ gnozal:
Ich möchte diesen Teppich nicht kaufen.*

*) Don't answer him. He isn't worth it. Better spend your time on your well-done libs!