Peer-to-Peer mit Socket-Komponente

[herkulesamstart]

hallo,

Ich möchte gerne die Socket-Komponenten dazu benutzen, ein P2P netz zu realisieren. Ich arbeite mit delphi 6 PE und daher stehen mir auch keine Indy's zur Verfügung.

Mein Problem besteht jetzt darin, dass ich mit TServerSocket nur einen Server auf einem Host (meinem PC) einrichten kann. Fehlermeldung:"Windows Socket error: Normalerweise darf jede Socketadresse(Protokoll, Netzwerkadresse oder Anschluss) nur jeweils einmal verwendet werden(10048), on API 'bind'". Wenn ich mehere Hosts Server sein lasse, dann gibts da auch kein Problem. Ich möchte aber gerne die Anwendung auf einem Host öfter laufen lassen(also viele Server auf einem Host) und ein P2P-Netzwerk simulieren. Kann ich das Problem umgehen, da in der Fehlermeldung von "Normalerweise" die rede ist?