Problem: Entpacken. (gelöst)
- Mok
- BotHunter
- Beiträge: 1484
- Registriert: 26.12.2005 14:14
- Computerausstattung: MSI GX780R
Intel Core i5-2410M
Nvidia GT 555M
Windows 7 Home Premium 64 bit - Wohnort:
Ich weiß nicht, die 1. Datei lässt sich entpacken, aber die 2. nicht!
Code: Alles auswählen
If OpenPack("Dateien.pack")
*AdresseText = NextPackFile()
Pfad$ = PathRequester("Wohin soll ich die Dateien kopieren?","C:\")
CreateFile(0,Pfad$+"beispiel.txt")
WriteData(*AdresseText,PackFileSize())
CloseFile(0)
*AdresseTabelle = NextPackFile()
CreateFile(1,Pfad$+"Tabelle.xls")
WriteData(*AdresseTabelle,PackFileSize)
CloseFile(1)
MessageRequester("Info","Alle Dateien erfolgreich entpackt!",0)
Else
MessageRequester("Fehler!","Die Dateien konnten nicht entpackt werden!",16)
End
EndIf
End
Win 7 Home Premium 64 bit | PureBasic 5.20 - x86 und x86-64 | Firefox [aktuelle stable-Version hier einfügen]
"Jeder macht irgendwann mal Fehler, darum gibt's auch Bleistifte mit Radiergummi." --Carl
"Jeder macht irgendwann mal Fehler, darum gibt's auch Bleistifte mit Radiergummi." --Carl
Mok hat geschrieben:Code: Alles auswählen
WriteData(*AdresseTabelle,PackFileSize)
Code: Alles auswählen
WriteData(*AdresseTabelle,PackFileSize())

Grüße ... Kiffi
a²+b²=mc²
- HeX0R
- Beiträge: 3042
- Registriert: 10.09.2004 09:59
- Computerausstattung: AMD Ryzen 7 5800X
96Gig Ram
NVIDIA GEFORCE RTX 3060TI/8Gig
Win11 64Bit
G19 Tastatur
2x 24" + 1x27" Monitore
Glorious O Wireless Maus
PB 3.x-PB 6.x
Oculus Quest 2 + 3 - Kontaktdaten:
Das Problem ist nur, dass es EnableExplicit in der 3.94er Version noch nicht gab.
{Home}.:|:.{Codes}.:|:.{Downloads}.:|:.{History Viewer Online}.:|:.{Bier spendieren}
also EnableExplicit ist die nervigste sache in PB, (deshalb verwende ich sie auch nicht)
da man bei 95% alle Compilierungsversuche ein BING an den Kopf bekommt, was auf dauer auf die nerven geht, wenn man nur mal "kurz" ein Testcode einbauen will, und EnableExplicit gleich rummeckert. "Was ist dies, was ist das, woher kommt das, ...."
Meine Meinung ^^ soll keine Diskusion anregen ^^
da man bei 95% alle Compilierungsversuche ein BING an den Kopf bekommt, was auf dauer auf die nerven geht, wenn man nur mal "kurz" ein Testcode einbauen will, und EnableExplicit gleich rummeckert. "Was ist dies, was ist das, woher kommt das, ...."
Meine Meinung ^^ soll keine Diskusion anregen ^^
PB 6.01 ― Win 10, 21H2 ― Ryzen 9 3900X, 32 GB ― NVIDIA GeForce RTX 3080 ― Vivaldi 6.0 ― www.unionbytes.de
Aktuelles Projekt: Lizard - Skriptsprache für symbolische Berechnungen und mehr
Aktuelles Projekt: Lizard - Skriptsprache für symbolische Berechnungen und mehr