Zitat von
Christian Seehase:
Moin Chewie,
wenn ich das richtig sehe, dann hat OutputStream die Grösse 0, denn er wird nur angelegt, aber nichts da reingeschrieben, somit wird die Länge von buf auf 0 gesetzt, und die Schleife läuft von 0 bis -1, wird also übersprungen.
Nein, leider nicht. Bei TCompressionStream.Create wird OutputStream übergeben; in diesen wird laut den Kommentaren in der
zlib.pas die komprimierten Daten kopiert. Und wenn ich OutputStream.SaveToFile ausführe, werden ja die Daten richtig gespeichert.
Nur das Lesen klappt nicht. buf ist voller Nullen. Auch wenn ich buf als String deklarier, macht es keinen Unterschied.