Changeset 572 for CoolStreaming/StreamHelper.pas

Timestamp:

Jun 25, 2024, 1:37:11 AM (3 months ago)

Author:

chronos

Message:

• Modified: Removed U prefix from CoolStreamin unit names.

File:

• CoolStreaming/StreamHelper.pas (moved) (moved from CoolStreaming/UStreamHelper.pas ) (3 diffs)

CoolStreaming/StreamHelper.pas

@@ -1 @@
-unit UStreamHelper;
-
-{$mode delphi}{$H+}
+unit StreamHelper;
 
 interface
@@ -68 +66 @@
   end;
 
+
 implementation
 
@@ -232 +231 @@
 destructor TStreamHelper.Destroy;
 begin
-  if FOwnStream then FStream.Free;
-  inherited Destroy;
+  if FOwnStream then FreeAndNil(FStream);
+  inherited;
 end;