LMD VCL - ZLib support - Revision history

Rafael at 12:52, 5 October 2008

2008-10-05T12:52:24Z

Rafael at 12:30, 5 October 2008

2008-10-05T12:30:19Z

Rafael: ZLib support moved to LMD VCL - ZLib support

2008-10-05T12:27:17Z

ZLib support moved to LMD VCL - ZLib support

Fduch: /* LMDZLib interface */

2007-07-30T19:10:42Z

‎LMDZLib interface

Fduch at 13:10, 17 July 2007

2007-07-17T13:10:37Z

Fduch: /* Units */

2007-07-17T13:01:23Z

‎Units

Fduch: /* Introduction */

2007-07-17T13:00:28Z

‎Introduction

Fduch: /* LMDZLib interface */

2007-07-17T12:58:44Z

‎LMDZLib interface

Fduch at 12:56, 17 July 2007

2007-07-17T12:56:39Z

New page

== Introduction ==
LMD 2k7 has built in ZLib library to compress/uncompress any data. This is native pascal solution it doesn't require any external obj or dll files.

== Units ==
LMDZCommonUnit.pas - Common code and types for compress/decompress routines
LMDZCompressUnit.pas - Unit that contain compression code (raw ZLib api)
LMDZUncompressUnit.pas - Unit with uncompression code (raw ZLib api)
LMDZLib.pas - TStream wrappers that provide interface to compress/decompress data directly into any TStream descendants.

== LMDZLib interface ==
TLMDCompressionStream wrapper class that compress data directly to any TStream descendant, and has transparent interface that compatible with TStream, so you can easily add compression for exists application. Example:

<delphi>
uses
..., LMDZLib, ...;

// old code
...
var
LDataStream: TFileStream;
begin
LDataStream := TFileStream.Create(FileName, fmCreate);
try
LDataStream(FSomeData, FSizeOfSomeData);
finally
LDataStream.Free;
end;
end;
...

// code with TLMDCompressionStream
...
var
LDataStream: TLMDCompressionStream;
LFileStr: TFileStream;
begin
LFileStr := TFileStream.Create(FileName, fmCreate);
try
try
LDataStream(FSomeData, FSizeOfSomeData);
finally
LDestStream.Free;
end;
finally
LFileStr.Free;
end;
end;
...
</delphi>

← Older revision		Revision as of 12:52, 5 October 2008
Line 1:		Line 1:
		+	{{Head-StartRes}}
		+
	== Introduction ==		== Introduction ==
	Since 2007 series the LMD shared Runtime provides built-in ZLib library to compress/decompress any data. This is a native pascal solution and it doesn't require any external obj or dll files.		Since 2007 series the LMD shared Runtime provides built-in ZLib library to compress/decompress any data. This is a native pascal solution and it doesn't require any external obj or dll files.

@@ Line 1: / Line 1: @@
 == Introduction ==
-LMD 2k7 has built in ZLib library to compress/decompress any data. This is native pascal solution it doesn't require any external obj or dll files.
+Since 2007 series the LMD shared Runtime provides built-in ZLib library to compress/decompress any data. This is a native pascal solution and it doesn't require any external obj or dll files.
 == Units ==
@@ Line 91: / Line 91: @@
 </delphi>
-As you can see changes in code are minimal.
+As you can note required changes in your code are minimal.

← Older revision	Revision as of 12:27, 5 October 2008
(No difference)

@@ Line 15: / Line 15: @@
    ..., LMDZLib, ...;
-// old code
+// code before using TLMDCompressionStream
 ...
 var
@@ Line 56: / Line 56: @@
    ..., LMDZLib, ...;
-// old code
+// code before using TLMDDecompressionStream
 ...
 var

@@ Line 39: / Line 39: @@
      LDataStream := TLMDCompressionStream.Create(clDefault, LFileStream);
      try
-       LDataStream(FSomeData, FSizeOfSomeData);
+       LDataStream.Write(FSomeData, FSizeOfSomeData);
      finally
        LDestStream.Free;
@@ Line 49: / Line 49: @@
 ...
 </delphi>

@@ Line 3: / Line 3: @@
 == Units ==
-LMDZCommonUnit.pas - Common code and types for compress/decompress routines
+* LMDZCommonUnit.pas - Common code and types for compress/decompress routines (raw ZLib api)
-LMDZCompressUnit.pas - Unit that contain compression code (raw ZLib api)
+* LMDZCompressUnit.pas - Unit that contain compression code (raw ZLib api)
-LMDZUncompressUnit.pas - Unit with uncompression code (raw ZLib api)
+* LMDZUncompressUnit.pas - Unit with uncompression code (raw ZLib api)
-LMDZLib.pas - TStream wrappers that provide interface to compress/decompress data directly into any TStream descendants.
+* LMDZLib.pas - TStream wrappers that provide interface to compress/decompress data directly into any TStream descendants.
 == LMDZLib interface ==

@@ Line 33: / Line 33: @@
 var
    LDataStream: TLMDCompressionStream;
-   LFileStr: TFileStream;
+   LFileStream: TFileStream;
 begin
-   LFileStr := TFileStream.Create(FileName, fmCreate);
+   LFileStream := TFileStream.Create(FileName, fmCreate);
    try
      try
        LDataStream(FSomeData, FSizeOfSomeData);
@@ Line 43: / Line 44: @@
      end;
    finally
-     LFileStr.Free;
+     LFileStream.Free;
    end;
 end;
 ...
 </delphi>