Beide Schleifen laufen bis FOriginal.count.
Die die FSelect behandelt muss aber logischer weise auch bis FSelect.count laufen
Am besten packst du tatsächlich die komplette Schleife ins Unterprogramm und läufst da bis List.count.
Wobei list halt die übergebene Liste ist