просто как грамотно написать сикл который будет гнаться до последнего компонента класса например tlabel на текущей форме

просто хочю создать массив с именами компонентов выбранного мною класса

ккак обратиться к максимальному количеству компонентов на форме класса T?????