複数のホスト名を接続順に表示するには?

解決


きゅう  2005-12-20 15:17:14  No: 19337  IP: 192.*.*.*

複数のlabelでクライアントのホスト名を
表示させたいと思っています。
接続順に表示させるにはどのようにしたらよいでしょうか?

環境:Delphi6 personal

for i := 0 to conn-1 do
 begin
 rmhost := ServerSocket1.Socket.Connections[conn-1].RemoteHost;  

 (FindComponent('label' + IntToStr(i)) As TLabel).Caption:=rmhost; 
 end;
end;

現時点では、1番目のホスト名は表示できます。
しかし、2番目のホストを接続させると
1番目のホスト名が上書きされて表示されてしまいます。
例) user1  user2  →  abc  user2  →  xyz  xyz

勉強不足ですみません。よろしくお願いします。

編集 削除
どやさ  2005-12-20 19:38:01  No: 19338  IP: 192.*.*.*

rmhost := ServerSocket1.Socket.Connections[conn-1].RemoteHost;
この行の Connections のインデックス(conn-1) って
どこかで(どのように)変更してるの?

編集 削除
きゅう  2005-12-20 22:35:12  No: 19339  IP: 192.*.*.*

for文の前で
conn:=ServerSocket1.Socket.ActiveConnections; 

とやって、接続中のクライアント数を取得させています。

編集 削除
Mr.XRAY  URL  2005-12-21 18:05:33  No: 19340  IP: 192.*.*.*

>rmhost := ServerSocket1.Socket.Connections[conn-1].RemoteHost;

ここの[conn-1]を[i]にしてみたらどうなりますか.

編集 削除
きゅう  2005-12-21 23:39:14  No: 19341  IP: 192.*.*.*

>Mr.XRAYさん

[i]でしてみたところ、うまくいきました。
アドバイスありがとうございました。

編集 削除