Ja, wie ich schon geschrieben hatte...
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
Var
lLine: Integer;
Begin
lLine := 0;
// onlist.BeginUpdate;
While ( lLine < onlist.Count ) Do
If SameText(onlist[lLine], Edit2.Text) Then
onlist.delete(lLine)
Else
Inc(lLine);
// onlist.EndUpdate;
end;