for (int j = 0; j<Form1->k; j++) {delete ImMap[j]; ImMap.clear(); delete ImLab[j]; ImLab.clear();}
Form2->ShowModal();
TForm2 *Form2 = new TForm2(this); Form2->ShowModal(); delete Form2;