假如当前是FORM1的代码窗口:
TButton *Button=new TButton(this);
Form1->InsertControl(Button);
Button->Caption="动态生成";
Button->OnClick=ButtonClick;建立事件响应子程序
void __fastcall TForm1::ButtonClick(TObject *Sender)
{
ShowMessage("Ok,You click here!");
}在Form1的头文件中申明
__private:
void __fastcall ButtonClick(TObject *Sender);
TButton *Button=new TButton(this);
Form1->InsertControl(Button);
Button->Caption="动态生成";
Button->OnClick=ButtonClick;建立事件响应子程序
void __fastcall TForm1::ButtonClick(TObject *Sender)
{
ShowMessage("Ok,You click here!");
}在Form1的头文件中申明
__private:
void __fastcall ButtonClick(TObject *Sender);
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货