IdTCPServer1Execute(AThread: TIdPeerThread);
IdTCPServer1Execute(AThread: TIdPeerThread);
TreeView1.Items.AddChild(TreeView1.Items[0], ip);
取ip放到了TreeView1里
IdTCPClient1关闭后如何删TreeView1里的这个IP啊.
[解决办法]
主要看你怎么添加的了,如果你是正常添加的
- Delphi(Pascal) code
procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread);var ZJIP:TTreeNode; begin try ZJIP:=treeview.Items.Add(nil,AThread.Connection.Socket.Binding.PeerIP); ZJIP.Data := AThread; AThread.Data := ZJIP; except end;end;