Последовательное создание Edit при нажатие на button - C++ Builder - Ответ 7397701

#include <vcl.h>
#pragma hdrstop
 
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
int i,d,c;
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormCreate(TObject *Sender)
{
 i = 1;
 d = 2;
 c = d;
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
      TEdit *iEdit = new TEdit(this);
      iEdit->Parent = this;
      iEdit->Name = "Edit"+AnsiString(i);
      iEdit->Height = 21;
      iEdit->Width =  121;
      if(i>10)
     {
      iEdit->Left = 125;
      iEdit->Top = c;
      c+=30;
     }
     else
     {
      iEdit->Left =  3;
      iEdit->Top  = d;
      d+=30;
     }
      i++;
 
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action)
{
for (int i = 0; i < Form2->ComponentCount; i++)
 {
        if (Form2->Components[i]->ClassNameIs("TEdit"))
         {
             delete Form2->Components[i];
             i--;
         }
 }
}
//---------------------------------------------------------------------------