bcb 动态生成控件
来源:互联网 发布:工业软件网 编辑:程序博客网 时间:2024/05/17 02:36
窗体上的所有对象与窗体本身都成为一个类:TForm1,我们就是将类成员与类成员函数写到TForm1类中,程序运行时,实际上就是通过TForm1 类生成Form1对象, 所以,Unit1.cpp中的函数都以void __fastcall TForm1::打头,这就表明这些函数都是TForm1类的类成员函数,它们可以调用在类中我们定义的类成员。当然,我们可以在Unit1.cpp中定 义我们自己的变量和函数,供其它函数调用,这点符合C调用规范。当然,这种类外界的函数是不能调用到TForm1类中定义的类成员与类成员函数的,除非是 公有成员与公有成员函数,但必须在公有成员与公有成员函数前加上对象名称,即Form1->TForm1类公有成员(或TForm1类公有成员函 数)。[喝小酒的网摘]http://blog.const.net.cn/a/15485.htm
1、本例是BCB面向对象设计的精髓,完全是利用类生成对象机制。
2、新建立一个BCB工程,在上面放一个按钮Button1
3、Unit1.h
////---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: //// IDE-managed Components
TButton *Button1;
void __fastcall Button1ClickClick(TObject *Sender);
private: // User declarations
////定义类私有成员函数,用来删除所有已生成的按钮
void __fastcall DeleteAllBn(void);
////定义类私有成员函数,用来生成共公响应事件
void __fastcall BtnClick(TObject *Sender);
////定义大小为30的按钮类对象
TButton *Bn[30];
////用来记录已生成按钮的数量
int BnCount;
public: //// User declarations
////窗体类的构造函数
__fastcall TForm1(TComponent* Owner);
////窗体类的析构函数
__fastcall ~TForm1();
};
__fastcall TForm1::~TForm1()
{
////在析构函数中将已生成的按钮对象删除
DeleteAllBn();
}
////---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
////---------------------------------------------------------------------------
#endif
4、Unit1.h
TForm1 *Form1;
////---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//// 释放所有资源
void __fastcall TForm1::DeleteAllBn(void)
{
int ii;
for(ii=0;ii<BnCount;ii++)
{
delete Bn[ii];
}
}
////---------------------------------------------------------------------------
void __fastcall TForm1::Button1ClickClick(TObject *Sender)
{
int ii,yy,ww;
ww=12;yy=45;
//// 释放所有资源
DeleteAllBn();
ShowMessage("所有原先生成的资源都已释放!!!按任意键重新生成!!!");
for(ii=0;ii<30;ii++)
{
Bn[ii]=new TButton(this);
Bn[ii]->Parent=this;
////置响应函数
Bn[ii]->OnClick=BtnClick;
Bn[ii]->Caption=IntToStr(ii);
////根据窗口的宽度布置按钮的位置
if(ww+Bn[ii]->Width+5>Width)
{
yy=yy+Bn[ii]->Height+5;
ww=12;
}
Bn[ii]->Left=ww;
Bn[ii]->Top=yy;
ww=ww+Bn[ii]->Width+5;
}
////标记当前生成了多少个按钮
BnCount=30;
}
////公共响应函数
void __fastcall TForm1::BtnClick(TObject *Sender)
{
TButton *cn;
cn=(TButton *)Sender;
ShowMessage(cn->Caption);
}
1、本例是BCB面向对象设计的精髓,完全是利用类生成对象机制。
2、新建立一个BCB工程,在上面放一个按钮Button1
3、Unit1.h
////---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: //// IDE-managed Components
TButton *Button1;
void __fastcall Button1ClickClick(TObject *Sender);
private: // User declarations
////定义类私有成员函数,用来删除所有已生成的按钮
void __fastcall DeleteAllBn(void);
////定义类私有成员函数,用来生成共公响应事件
void __fastcall BtnClick(TObject *Sender);
////定义大小为30的按钮类对象
TButton *Bn[30];
////用来记录已生成按钮的数量
int BnCount;
public: //// User declarations
////窗体类的构造函数
__fastcall TForm1(TComponent* Owner);
////窗体类的析构函数
__fastcall ~TForm1();
};
__fastcall TForm1::~TForm1()
{
////在析构函数中将已生成的按钮对象删除
DeleteAllBn();
}
////---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
////---------------------------------------------------------------------------
#endif
4、Unit1.h
TForm1 *Form1;
////---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//// 释放所有资源
void __fastcall TForm1::DeleteAllBn(void)
{
int ii;
for(ii=0;ii<BnCount;ii++)
{
delete Bn[ii];
}
}
////---------------------------------------------------------------------------
void __fastcall TForm1::Button1ClickClick(TObject *Sender)
{
int ii,yy,ww;
ww=12;yy=45;
//// 释放所有资源
DeleteAllBn();
ShowMessage("所有原先生成的资源都已释放!!!按任意键重新生成!!!");
for(ii=0;ii<30;ii++)
{
Bn[ii]=new TButton(this);
Bn[ii]->Parent=this;
////置响应函数
Bn[ii]->OnClick=BtnClick;
Bn[ii]->Caption=IntToStr(ii);
////根据窗口的宽度布置按钮的位置
if(ww+Bn[ii]->Width+5>Width)
{
yy=yy+Bn[ii]->Height+5;
ww=12;
}
Bn[ii]->Left=ww;
Bn[ii]->Top=yy;
ww=ww+Bn[ii]->Width+5;
}
////标记当前生成了多少个按钮
BnCount=30;
}
////公共响应函数
void __fastcall TForm1::BtnClick(TObject *Sender)
{
TButton *cn;
cn=(TButton *)Sender;
ShowMessage(cn->Caption);
}
0 0
- BCB 动态生成控件
- bcb 动态生成控件
- BCB动态生成(用代码生成)按钮的方法
- 动态生成控件
- VB 动态生成控件
- 动态生成控件
- 动态生成自定义控件
- 动态生成控件
- 动态生成控件web
- Android 动态生成控件
- Android 动态生成控件
- c# 动态生成 控件
- 对话框动态生成控件
- C#动态生成控件
- 动态生成DropDownList控件
- 动态生成控件
- 动态生成用户控件
- 【C++】动态生成控件
- Android程序:简易浏览器的实现(WebView)
- 无法连接到 WMI 提供程序
- (转)深入浅出聊优化:从Draw Calls到GC
- CADisplayLink 动画
- HDOJ 1509 Windows Message Queue
- bcb 动态生成控件
- GDT(全局描述符表)和LDT(局部描述符表)
- 划分数 不超过m组 dp
- 开心的小明
- CSS3新增样式大解析:[6]rotate之旋转-初级
- 黑马程序员—foundation框架总结
- 这些年被我们玩坏的Xcode -- Xcode debug area 的 debugger command 使用
- 设计模式:4)生成器模式
- vitrualbox 4 虚拟Ubuntu共享 主机文件夹方法