[Xcopy]

всем спасибо за старание.... надо было сделать так:

TLabel(FindComponent('Label' + IntToStr(i))).visible :=true;