Aus ListBox löschen...

[hircusmutzus]

hä, das versteh ich jetzt irgendwie nicht!
ich hab mal in der code library geguckt und da ist ein beitrag von dir drin, wie man eine listbox durchsichen kann und hab versucht das in meinen quelltext einzubauen, aber das hat nicht funktioniert!
ich schreib hier grad mal den code, vielleicht weist du ja was falsch ist.
Also der Client schickt beim disconnecten folgenden code:

Delphi-Quellcode:

procedure TForm1.ClientSocket2Disconnect(Sender: TObject;
  Socket: TCustomWinSocket);
begin
  ClientSocket2.Socket.SendText(Edit1.Text); //Edit1 beinhaltet den Nickname
end;

und der Server macht dann folgendes

Delphi-Quellcode:

procedure TForm1.ServerSocket2ClientDisconnect(Sender: TObject;
  Socket: TCustomWinSocket);
var nick: string;
    i: integer;
begin
  nick:=Socket.ReceiveText;
  for i:=0 to ListBox2.Items.Count -1 do
  begin
    if ListBox2.Items.Strings[i] = nick then
      ListBox2.Items.Delete(i);
  end;
end;

MfG Matthias Volland