首页 > 学院 > 开发设计 > 正文

BCB中派生VCL类及动态地创建控件

2019-11-17 05:21:28
字体:
来源:转载
供稿:网友

  以下不完整例子为生成一个TMemo的派生类及动态地创建该VCL控件。

Class TMemoEx : public TMemo
{
.
.
}
extern TMemoEx memoex;

Class TForm1 : Class TForm
{
public:
TMemoEx *MemoEx;
.
.
}

void _fastcall TForm1::FormShow(TObject *Sender)
{
MemoEx=new TMemoEx(this);
MemoEx->Parent=this;
.
.
}
总之,遵循以下步骤即可:
类定义;
extern TMemoEx memoex;
TMemoEx *MemoEx;
MemoEx=new TMemoEx(this);
MemoEx->Parent=this;

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表