temp+integer := 'text' -> Czy to jest możliwe

Tak się ostatnio zastanawiam czy idzie w jakiś sposób tak wprowadzać dane?

Przykład 1 - typowe przypisywanie danych

a1.caption := 'nazwa1';
a2.caption := 'nazwa2';
a3.caption := 'nazwa3';

Przykład 2 - Czy i jak zmieniac zmienne?

For X := 1 To 3 Begin
a + (Integer).caption := 'nazwa'+inttostr(X);

Np.tak:

 For I := 1 To 3 Do
  TButton(FindComponent('Button'+IntToStr(I))).Caption := 'Test '+IntToStr(I);

Dziękuję ci bardzo za odpowiedź

A w jaki sposób odnieść się do zmiennych np:

var
  Tabela1 : String; 
  Tabela2 : String;
  Liczba : Integer;
begin
  Liczba := 1;
  Tabela + Liczba := 'Test';
end;

Nie da się tego zrobić, od tego są tablice.