如题了.

解决方案 »

  1.   

    halfdream(哈欠) :是这样的,但IP可以通过RemoteAddress属性获取,Port通过什么获取呢?
      

  2.   

    呵呵。。既然你都能取到RemoteAddress属性,我就不信你取不到RemotePort属性。。
      

  3.   

    端口肯定是设定好的了,我现在是想知道如果出现IP相同的机子同时连上ServerSocket的话,ServerSocket是怎么区分是那个ClientSocket的,我看了一些资料,说如果IP相同的话,Socket会自动创建一个新的端口进行通讯,不知道是不是这样的,是的话如何得到它自动创建的端口号呢?
      

  4.   

    就这么简单的就可以取到。楼主要学会自己多动手去尝试。procedure TForm1.ServerSocket1ClientConnect(Sender: TObject;
      Socket: TCustomWinSocket);
    var
      rIp:string;
      rPort:integer;
    begin
      rIp:=Socket.RemoteAddress;
      rPort:=socket.RemotePort;  showMessage('远程'+rIp+':'+intToStr(rPort));
    end;
      

  5.   

    原来就是这么简单,是我自己太大意,没注意到Port是整型的,所以老是找不到, halfdream,太谢谢你了,结贴!