VCL Delphi

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