如何将N多edit框中的输入值存储为数组？急，在线等！

Question

如果只有5个EDIT框，我可以一个个把editN.text赋给A[N]，但是这种程序太死板了，有没有好的方法？如果有N个输入框，这种方法肯定不行，请大虾指教？ 
谢谢！！

Answer 1

for i := 0 to n do
begin
 A[i] := TEDit (self.FindComponent('edit' + IntToStr(i))).Text;
end;

Answer 2

for i:=0 to self.controls.count-1 do
  if controls[i].classnameis('tedit') then
    a[j]:=...