Wie Daten unter PBB 4.00 entpacken?

[kiki]

Hallo, ich habe eine Frage:

Wie entpackt man unter PB 4.00 Dateien, ich versteh dass nicht mit dem Speicherbereich und der Größe.

[edel]

Mit was hast du denn gepackt ?

PBPacker -> createpack oder nur PackMemory ?

andere Packer ?

[ts-soft]

Wäre einfacher, wenn wir Deinen Code zum packen sehen würden.

Für einen mit PB gepackten File, brauchen wir 2 Speicher, und zwar einen so
gross, wie die Datei ist, den anderen so gross, wie die Datei entpackt ist.
Hierfür mal bei AllocateMemory nachsehen, ansonsten mal Deinen bisherigen
Code posten.

[kiki]

So:

Code: Alles auswählen

If CreatePack("c:\Packer.pak") 
  AddPackFile("C:\test.txt") 
  ClosePack() 
EndIf 

[ts-soft]

Code: Alles auswählen

If OpenPack("c:\Packer.pak")
  TextMem.l = NextPackFile()
  TextSize.l = PackFileSize()
 
  File = CreateFile(#PB_Any, "C:\test_neu.txt")
  If File
    WriteData(File, TextMem, TextSize)
    CloseFile(File)
  EndIf
  ClosePack()
EndIf

[kiki]

ERROR in Zeile 7: This Memory buffer is not Initialized

[ts-soft]

Welche PB Version? Bei mir gehts fehlerfrei
Wie gross ist die Textdatei?

// Nachtrag:
Nimm mal diese Version:

Code: Alles auswählen

If OpenPack("c:\Packer.pak")
  TextMem.l = NextPackFile()
  TextSize.l = PackFileSize()

  If TextMem And TextSize
    File = CreateFile(#PB_Any, "C:\test_neu.txt")
    If File
      WriteData(File, TextMem, TextSize)
      CloseFile(File)
    EndIf
    ClosePack()
  Else
    Debug "Ein Fehler ist aufgetreten"
  EndIf
EndIf

[kiki]

PB 4.00 und die Datei ist 10 zeichen groß es soll aber auch gehen wenn die Datei 400 MB Groß ist!

[ts-soft]

>> es soll aber auch gehen wenn die Datei 400 MB Groß ist!
Das bezweifel ich, der PB-Packer muckt teilweise schon unter 20 MB