There is still another way to solve this: create the Edits (or Labels or whatever) dynamically:
Delphi-Quellcode:
var LblArray: array of TLabel;
i: Integer;
...
SetLength(LblArr, 4);
for i:= 0 to High(LblArr) do
LblArr[i]:= TLabel.Create(nil);
Greets
Binärbaum