简单的datasnap三层，【服务器】怎么获取【连接客户端】的【计算机名】

简单的datasnap三层，【服务器】如何获取【连接客户端】的【计算机名】？
新手求教~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
------解决思路----------------------
客户端连接服务器成功后，向服务器发送消息：
DataModule1.SocketConnection1.AppServer.ClientOnOut(aPCName,aIP,'','上线    ','IN');