Changeset 324 for trunk/Packages/TemplateGenerics/Additional/BinarySerializer.pas

Timestamp:

Jun 25, 2024, 11:04:00 AM (8 days ago)

Author:

chronos

Message:

• Modified: Updated TemplateGenerics package.

File:

• trunk/Packages/TemplateGenerics/Additional/BinarySerializer.pas (moved) (moved from trunk/Packages/TemplateGenerics/Additional/UBinarySerializer.pas ) (2 diffs)

trunk/Packages/TemplateGenerics/Additional/BinarySerializer.pas

@@ -1 @@
-unit UBinarySerializer;
-
-{$mode delphi}{$H+}
+unit BinarySerializer;
 
 interface
@@ -217 +215 @@
 destructor TBinarySerializer.Destroy;
 begin
-  if OwnsList then FList.Free;
-  inherited Destroy;
+  if OwnsList then FreeAndNil(FList);
+  inherited;
 end;