niszczenie komponentów

Mam taki problem:
Mam kilka dynamicznych komponentów (ich liczba jest zmienna) i chce jest teraz pousuwać z formy. problem mam z odwołanie się do każdego i wywołaniem .free. Wszystkie są TImage. pozdrawiam

if..then, for, FindComponent, ComponentCount, Component[], is, as. Chyba wystarczy.

Przejrzyj w pętli wszystkie komponenty na formie i usuń TImage. Albo inaczej - przypisz komponentom wartość pola Parent na formę - niech ona męczy się z ich usunięciem podczas zamykania; albo przy dodawaniu odnotowuj je w dynamicznej tablicy lub liście.

Sposobów są dziesiątki - pomyśl.

chodzi o to żeby np za usunięcie komponentu odpowiadał przycisk, a nie gdy cała forma jest niszczona.
co do przeglądania komponentów to właśnie nie wiem jak je rozróżnić poza components index. po czym jeszcze można rozróżnić komponenty?? jakbym chciał napisać pętle to co ma być zmienną. próbowałem z tym indexem ale nie działa za dobrze.

Po polu Name lub po prostu:

if (Component is TImage) then