Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Hinweis zu ZLIB (https://www.delphipraxis.net/102941-hinweis-zu-zlib.html)

peschai 7. Nov 2007 10:35


Hinweis zu ZLIB
 
Hallo
Bin gerade über etwas gemeines gestolpert und möchte euch das zeigen, damit eventuell andere nicht in dieselbe Falle laufen. Der folgende Code zum Packen von Daten mit zLib funktioniert nicht da erst mit dem jCompressor.Free alle Daten in den TargetStream geschrieben werden. Leider gibt es hier kein "Flush", wie es früher bei Datei operationen möglich war. :wink:
Delphi-Quellcode:
...
    TargetStream := T???Stream.Create('');
    jCompressor := zLib.TCompressionStream.Create(clDefault, TargetStream);
    jCompressor.Write(Buffer,Size);
    Result := TargetStream.Size;
...
Richtig ist in diesem Beispiel also
Delphi-Quellcode:
...
    TargetStream := T???Stream.Create('');
    jCompressor := zLib.TCompressionStream.Create(clDefault, TargetStream);
    jCompressor.Write(Buffer,Size);
    FreeAndNil(jCompressor);
    Result := TargetStream.Size;
...
ciao...


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:09 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz