Remove invalid log on TcpIp component

src/core/UTCPIP.pas

@@ -350,8 +350,7 @@ begin
       DebugStep := 'Relasing flock';
       FConnected := false;
       DebugStep := 'Calling OnDisconnect';
-      if Assigned(FOnDisconnect) then FOnDisconnect(Self)
-      else TLog.NewLog(ltError,ClassName,'OnDisconnect is nil');
+      if Assigned(FOnDisconnect) then FOnDisconnect(Self);
       {$ENDIF}
     Finally
       FLock.Release;