for(int i = 0; i < 5; i++) { Frame1 = new TFrame1(Panel1); Frame1->Parent = Panel1; Frame1->Align = alTop; Frame1->Memo1->Lines->Add("asdf"); }