<b>BCB中派生VCL类及动态地成立控件</b>[VC/C++编程]

以下不完好例子为生成一个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;