Changeset 384 for PinConnection

Timestamp:

Jul 9, 2012, 3:58:43 PM (12 years ago)

Author:

chronos

Message:

 

File:

• PinConnection/UCommThread.pas (modified) (1 diff)

PinConnection/UCommThread.pas

@@ -125 +125 @@
 begin
   Active := False;
-  FInputBuffer.Free;
-  FInputBufferLock.Free;
-  Ext.Free;
-  Pin.Free;
-  FStatusEvent.Free;
-  FDataAvailable.Free;
-  inherited Destroy;
+  FInputBufferLock.Acquire;
+  FreeAndNil(FInputBuffer);
+  FreeAndNil(FInputBufferLock);
+  FreeAndNil(Ext);
+  FreeAndNil(Pin);
+  FreeAndNil(FStatusEvent);
+  FreeAndNil(FDataAvailable);
+  inherited;
 end;