Zunächst einmal: Du solltest nicht A1, A2... verwenden, sondern ein Array[1..100] of Integer.
Dann gibt es zwei Möglichkeiten.
1)Du erzeugst die Edit-Felder dynamisch in einem Array (Array[1..100] of TEdit) und setzt dann ihre Position etc. Dann könntest du dann so einlesen:
Delphi-Quellcode:
for i := Low(Edits) to High(Edits) do
A[i] := StrToInt(Edits[i].Text);
2)Mittels FindComponent kannst du Komponenten über ihren Namen suchen. Das würde dann so aussehen:
Delphi-Quellcode:
for i := 1 to 100 do
A[i] := StrToInt(TEdit(FindComponent('Edit' + IntToStr(i))).Text);
Die erste Möglichkeit ist aber definitiv vorzuziehen. Denn wozu die Edits erstellen und nachher wieder suchen, wenn man sich auch direkt in einem Array merken kann, "wo" sie sind?
Viele Grüße