TForm2 *Form2 = new TForm2(this);
try {
　Form2->init( /*必要なパラメタ。但しTForm2にinitメソッドを作っておく事！*/);
　Form2->ShowModal();
} __finally {
　delete Form2;
}