Registriert seit: 11. Mär 2007
Ort: Saalkreis
1.633 Beiträge
Delphi 12 Athens
|
AW: System.Zip Entpacken einer Datei
27. Jan 2024, 07:51
Danke mytbo, aber ich hatte erst von Delphizip auf interne Funktionen umgestellt, da Delphizip meines Wissens nicht mehr weiterentwickelt wurde. Das wäre natürlich später eine Möglichkeit, wenn die internen dann noch nicht gehen.
Ich habe nun einmal die System.Zip lokal in mein Testprojekt kopiert und diese zu Debuggen genommen. Dabei ist mir aufgefallen, dass es Unterschiede in der Speicherung der einzelnen Dateien innerhalb der Zipdatei gibt.
Bei den Zipdateiten, wo es nicht funktioniert, ist das Trennzeichen ein Backslash, bei den Zipdateien, wo es funktioniert, ein normaler Slash.
Nun stellt sich für mich die Frage, ob das Zipprogramm (ich weiß nicht, wie die Dateien gezipt wurden) nicht nach Vorgabe zusammenpackt, oder ob Delphi hier nicht nach Solldefinition auspackt.
Ich könnte bestimmt die System.Zip ändern, aber das wäre nur eine Notlösung.
Darf man hier eine Zeile oder zwei aus der System.zip zeigen, wie es funktionieren könnte?
Wenn ich in der Funktion TZipFile.IndexOf die Backslahes durch Slashes ersetze, geht es erst einmal.
Matthias Es ist nie falsch das Richtige zu tun!
- Mark Twain
Geändert von zeras (27. Jan 2024 um 08:07 Uhr)
|