Можно ли писать так?

@Ханапов · Регистрация: 26.01.2013

С 10 компонентов Edit нужно взять сроку. Когда пишу вот так:

Delphi

for I := 1 to 10 do
  begin
    x[i] := StrToInt(Edit[i].Text);
    .......

выдает ошибку. Можно ли как нибудь изловчиться, что бы не собирать информацию с 10 эдитов вручную?

04.04.2014, 00:07

Delphi

1
2
3

for I := 1 to 10 do
  begin
    x[i] := StrToInt(TEdit(FindComponent('Edit' + IntToStr(I))).Text);

	04.04.2014, 00:07