Changeset 316 for trunk/UGameProtocol.pas

Timestamp:

Jun 19, 2024, 11:53:06 PM (5 months ago)

Author:

chronos

Message:

• Modified: Code cleanup.

File:

• trunk/UGameProtocol.pas (modified) (3 diffs)

trunk/UGameProtocol.pas

@@ -1 +1 @@
 unit UGameProtocol;
-
-{$mode delphi}
 
 interface
@@ -124 +122 @@
 destructor TGameProtocolServer.Destroy;
 begin
-  Pin.Free;
-  inherited Destroy;
+  FreeAndNil(Pin);
+  inherited;
 end;
 
@@ -240 +238 @@
 destructor TGameProtocolClient.Destroy;
 begin
-  Pin.Free;
-  inherited Destroy;
+  FreeAndNil(Pin);
+  inherited;
 end;