Hmm...

Jeg kan ikke få det her til at virke:

  For T := 0 to Theroom.Brugere.Items.Count - 1 Do
    Begin
      If Theroom.Brugere.Items[T] = Logon.Brugernavn.Text Then
        Begin
          Theroom.Brugere.Items.Delete(T);
        End;
    End;
  Theroom.Brugere.Items.SaveToFile('c:\windows\skrivebord\chatie\internetfiler\brugere.txt');

Den efterlader bar en tom plads istedet for at slette item'en!

Håber i forstår!