有人可以告诉我如何从服务器端获取已连接 session 的客户端 IP 吗?
谢谢
最佳答案
procedure TMyDSService.DataSnapServerConnect(DSConnectEventObject: TDSConnectEventObject);
var
Conn: TIdTCPConnection;
begin
Conn := TIdTCPConnection(DSConnectEventObject.ChannelInfo.Id);
Trace('Client ' + Conn.Socket.Binding.PeerIP +':' + IntToStr(Conn.Socket.Binding.PeerPort));
Trace('Client info: ' + DSConnectEventObject.ChannelInfo.Info);
end;
关于delphi - 如何在DataSnap 2010中获取客户端IP,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/2164188/