int iNappienLkm = 1;
        for (int k=0; k < 7; k++)               // 7 riviä
        {
                for (int i=0; i < 10; i++ )     // 10 rivissä
                {
                  TCheckBox* cb = new TCheckBox(Form1);   // Muokkaa tätä riviä jos haluat esim Edittejä tms.
                  cb->Parent = Form1;
                  cb->Caption = iNappienLkm;
                  cb->Name = "CheckBox" + IntToStr(iNappienLkm++);
                  cb->Top = 30*k;               // Välimatkat: 30 vertical
                  cb->Left = 40*i;              //             40  horizontal
                 }
        }