Wenn du den Port blockieren oder abhören willst, kannst du die Sockets verwenden und einfach den Port auswählen.
Um den Prot zu öffnen, kannst du folgende machen:
Delphi-Quellcode:
ClientSocket1.Port:=strtoint(Edit1.Text);
ClientSocket1.Open;
Memo1.Text:=ClientSocket1.RecieveText;
Müsste gehen, habs aber nicht getestet.
Julian J. Pracht