Torrent Client - socket.sendstream mit Memory Leak

[InfixIterator]

Vielleicht hilft es, wenn du den Memory Stream wieder frei gibst:
  result := tmemorystream.create; Da könnte sich einiges summieren, wenn die Funktion öfter aufgerufen wird.

Du musst auch aufpassen, falls der Handshake nur einmal ausgeführt werden soll, dass die Funktion auch nur einmal aufgerufen wird.
Vielleicht liegt auch ein Fehler in der Prozedur schreibe_string_in_stream immerhin wird die auch zweimal aufgerufen...