Moin Mario,
was mir nicht so ganz klar ist:
Warum löscht Du alles bis zu dem Nick, löscht dann die gesamte ListBox, und fügst wieder beide Stringlisten hinzu?
Das geht ganz erheblich an die Resourcen.
Warum nicht:
Delphi-Quellcode:
// Beispiel
if sl2.IndexOf(Nick) > -1 then
begin
sl2.Delete(sl2.IndexOf(Nick));
sl1.AddObject(Nick,image10.Picture.Bitmap);
end;
Was die Objekte angeht:
Die werden bei Delete mit aus der Liste entfernt, und bei AddStrings auch mitgenommen.