Hi,
wenn Du einen Client löscht bzw. dieser sich disconnected, verringert sich die Anzahl der Clients.
Deshalb solltest Du :
Delphi-Quellcode:
// Liste umgekehrt durchlaufen
for Count := ClientList.Count -1 downto 0 do begin
// Deine Zeile
for Count := 0 to ClientList.Count -1 do begin
Ausserdem solltest Du nicht :
Client.No := lbClients.Items.Count;
verwenden. Denn dadurch können Clients die gleiche Nummer erhalten !!!!
Stattdessen solltest Du eine globale Zählervariable verwenden, die Du einfach immer um 1 erhöst und
diese dann als Client.No verwenden.
Gruß Data
Der Horizont vieler Menschen ist ein Kreis mit Radius Null, und das nennen sie ihren Standpunkt.