TIdTCPServer im Dienst kann nicht "resetet" werden...

[cherry]

hi DataCool....

das hab ich doch hier versucht?!

Delphi-Quellcode:

     //disconnect clients (it should not have some established) 
     for i:=TCPServer.Contexts.LockList.Count-1 downto 0 do 
     begin 
       Cont:=TIdContext(TCPServer.Contexts.LockList.Items[i]); 
       Cont.Connection.Disconnect; 
     end; 
     TCPServer.Contexts.Clear; 
     TCPServer.Contexts.UnLockList;

konnte dann aber doch nicht deaktivieren...