for
 t := 1 to
 5 do

  FindComponent('Label'
 + IntToStr(t)).Visible := TRUE;