Чтобы найти и сделать видимыми, например, компоненты с
   именами от "Label1" и до "Label5" можно использовать
   следующий вариант: 


   for t := 1 to 5 do
     FindComponent('Label' + IntToStr(t)).Visible := TRUE;