[Agasfer2010]

Подскажите, люди! Как обратиться к каждому динамически созданному объекту, если я их создавал так:

Код:

for i := 1 to 4 do
begin
_TableName := TEdit.Create(self);
with _TableName do
  begin
  Parent := _Form;
  Top := 10;
  Left := 10 * i + (i - 1) * 160;
  Width := 160;
  _TableName.Name := _TableName.Text;
  end;
_Polename := TEdit.Create(self);
with _Polename do
  begin
  parent := _Form;
  Top := 60;
  Left := (i - 1) * 40 + 30 * i + (i - 1) * 100;
  Width := 100;
  end;
_Typepole := TComboBox.Create(self);
with _Typepole do
  begin
  Parent := _Form;
  Top := 90;
  Left := (i - 1) * 40 + 30 * i + (i - 1) * 100;
  Width := 100;
  Items.Add('INT');
  Items.Add('CHAR');
  Items.Add('DATE');
  end;
_KeyPole := TCheckBox.Create(self);
with _KeyPole do
  begin
  Parent := _Form;
  Top := 120;
  Left := (i - 1) * 40 + 30 * i + (i - 1) * 100;
  Caption := 'Ключевое поле';
  end;
end;

Admin: Не забываем про теги!