String aus einer Stringlist löschen

[Pseudemys Nelsoni]

hi, jo ist ne stringlist. Das memo ist am anfang leer, ich füge das nur der memo hinzu, um zu sehen ob die stringlist leer ist....was sie ja nicht ist da der string dann auftaucht....also der ganze "code" sieht so aus:

Delphi-Quellcode:

  if acommand = 'MODE' then
  begin
    Repeat
      Delete(s, 1, 1);
    until s[1] = ' ';
    Delete(s, 1, 1);
    Mode := Copy(s, 1, 2);
    if Mode = '+a' then
    begin
      nick := Copy(s, LastDelimiter(' ' , s)+1, length(s));  // Das letzte wort(der nick) des strings in die variable "nick"
      SlAdmin.AddObject(nick, image13.Picture.Bitmap);  // der nick in die admin stringlist
      if SlReg.IndexOf(nick) > -1  then
      SlReg.Delete(SlReg.IndexOf(nick)); // den nick aus der stringlist "slreg"(normale benutzer) löschen
      listbox1.Clear;
      listbox1.Items.AddStrings(SlAdmin);
      listbox1.Items.AddStrings(SlReg);
      memo1.Lines.AddStrings(SlReg);  // zum testen ob SlReg noch den string enthält
    end;
  end;
end;

so sieht das aus. die stringlists sind glboal definiert

aber das löschen geht nicht
[Edit=FuckRacism]Syntax verbessert[/Edit]