Indy: Server an Client

[Major1337]

hmm.. Ich bekomme aber einen Port zurück (3209) den ich gar nicht im Client deklariert habe o_O

Delphi-Quellcode:

procedure TForm2.IdTCPServer1Execute(AContext: TIdContext);
begin
Memo1.Lines.Add(acontext.Connection.Socket.ReadLn);

AContext.Connection.IOHandler.WriteLn(IntToStr(AContext.Connection.Socket.Binding.PeerPort) '  :   Erfolgreich übermittelt!');
end;

Liegt es vielleicht daran das die Ports nicht von Netzwerkadministrator freigeben wurden? Bin in einem Schulnetzwerk.