Как задать значение одной стокой нескольким компонентам

[vitamin.rulez]

Здарова всем!
У меня такой вопрос можно ли нескольким компонентам (например Label-ам) задать одной строкой одно значение, если да, то как?
Типо такого мб: Label[1..20].caption:='Вот так)'

[Sazary]

procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
t : TComponent;
begin
for i:=1 to 20 do
 begin
 t := FindComponent('Label'+IntToStr(i));
 TLabel(t).Caption := 'Вот так';
 end;
end;

[vitamin.rulez]

Спасибо больше, всё работает!