IdTcpServer如何取得Client端主机名？(50分)

C

csz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-20

• #1

Client端用IdTcpClient
AThread.Connection.LocalName取得的是服务器主机名
不想通过idtcpclient发送消息来传递，在服务器端如何取得客户端主机名？
谢谢关注！

 

C

csz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-20

• #2

没人理会啊，我来顶一顶

 

C

csz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-23

• #3

这50分没人想要吗？呵呵

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-23

• #4

getsockname(Clentsocket)什么的函数可以得到Client的名字

 

N

nibelcycer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-23

• #5

ClientName := AThread.Connection.LocalName;

 

C

csz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-26

• #6

nibelcycer你说的办法不行，取得的是server的主机名，不是client的

无忌兄getsockname这个函数不会用，搞半天也没明白

 

张

张无忌

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-26

• #7

function TCustomWinSocket.GetLocalAddress: string;
var
SockAddrIn: TSockAddrIn;
Size: Integer;
begin
Lock;
try
Result := '';
if FSocket = INVALID_SOCKET then Exit;
Size := SizeOf(SockAddrIn);
if getsockname(FSocket, SockAddrIn, Size) = 0 then
Result := inet_ntoa(SockAddrIn.sin_addr);
finally
Unlock;
end;
end;

 

C

csz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-26

• #8

多人接受答案了。