How to get client IP address in DataSnap 2010

Question

Can anyone tell me how to get the client ip of the connected session from the server side?

thanks

Answer 1

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; 

Answer 2

You request Request.RemoteAddr to get the IP address of the connected client.