Indy10中IdMappedPortTCP的用法

 

Indy10把参数由AThread换成AContext后，用法已经不同.

OnConnect中获取来源IP
AContext.Connection.Socket.Binding.PeerIP;

OnExecute中处理客户端来的数据
Var
aThread:TIdMappedPortContext;
s: string ;
begin
   aThread: = TIdMappedPortContext(aContext);
   s: = aThread.netdata;
   // ..(处理过程)

end ;

OnOutboundData中处理服务端过来的数据
Var
 aThread:TIdMappedPortContext;
 s: string ;
begin
  aThread: = TIdMappedPortContext(aContext);
  s: = aThread.netdata;
   // ..
end ;

 

转载于:https://www.cnblogs.com/jxgxy/archive/2009/06/22/1508243.html