由于工作需要,应项目需要改用VC,以后可能很少使用BCB了,但还是把它贴吧,
以下代码出自http://blog.csdn.net/hellogv/,引用请注明出处!
废话就不多说,直接开始本文的重点
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//----------首先是动态创建窗口
TForm *NewForm = new TForm(Application);//这里用TForm是为了创建空白窗口
//----------其次是动态创建控件
TButton *btn = new TButton(NewForm);//这里动态创建一个Button控件
btn->Caption = "MyButton"; //名称为"MyButton"
btn->Parent = NewForm;//规定了在动态创建的窗口显示
btn->OnClick=MyEvent;//OnClick事件是映射MyEvent,注:OnClick与MyEvent必须参数相同
btn->Show();
NewForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MyEvent(TObject *Sender)
{
ShowMessage("已经调用我的事件了");
}
本文来自CSDN博客,转载请标明出处:file:///C:/Documents%20and%20Settings/Administrator/桌面/bcb/C++%20Builder%20实现动态生成窗口、控件,以及处理控件事件%20-%20hellogv的专栏%20-%20CSDN博客.htm