Y
yyd
Unregistered / Unconfirmed
GUEST, unregistred user!
void _fastcall TForm1::Button1Click(TObject *Sender)
{
Tform2 *Forms;
try
{
Form2=new TForm2(Application);//动态创建Form2
Form2->ShowModal();
delete Form2;//把Form2释放
}
catch(Exception &exception)
{
delete Form2;
Application->ShowException(&exception);
}
}
这是一个动态创建窗体的过程,现在我想把它写成一个函数,以便使用,请问大虾们怎么写,我试过一些方式,但是不成功。请大虾给指导一二。
{
Tform2 *Forms;
try
{
Form2=new TForm2(Application);//动态创建Form2
Form2->ShowModal();
delete Form2;//把Form2释放
}
catch(Exception &exception)
{
delete Form2;
Application->ShowException(&exception);
}
}
这是一个动态创建窗体的过程,现在我想把它写成一个函数,以便使用,请问大虾们怎么写,我试过一些方式,但是不成功。请大虾给指导一二。