Ganz spontan würd ich ungetestet sagen so:
Delphi-Quellcode:
var
i: Integer;
Ar: Array [0..3] of Integer;
begin
for i := 0 to 3 do
Ar[i] := TEdit(FindComponent('Edit' + IntToStr(i + 1))).Text;
end;
Und wenn du Codestücke hast klicke vorher auf den Delphi-Code Button über dem Eingabefeld.#
//Edit: Geht natürlich nur wenn die Edits die Namen Edit1 bis Edit4 haben ...
Chuck Norris has counted to infinity ... twice!