📄 k6.htm
字号:
<html>
<head>
<title>BCB中派生VCL类及动态地创建控件</title>
<meta http-equiv="目录类型" content="文本/html; 字符集=gb2312">
</head>
<body bgcolor="#FFFFFF">
<table width="100%" border="0" height="285">
<tr>
<td height="35">
<div align="center" class="p14"><font color="#000000">BCB中派生VCL类及动态地创建控件</font></div>
</td>
</tr>
<tr valign="top">
<td><font color="#000000">以生成一个TMemo的派生类及动态地创建该VCL控件为例。 <br>
Class TMemoEx : public TMemo <br>
{ <br>
. <br>
. <br>
} <br>
extern TMemoEx memoex; <br>
<br>
Class TForm1 : Class TForm <br>
{ <br>
public: <br>
TMemoEx *MemoEx; <br>
. <br>
. <br>
} <br>
<br>
void _fastcall TForm1::FormShow(TObject *Sender) <br>
{ <br>
MemoEx=new TMemoEx(this); <br>
MemoEx->Parent=this; <br>
. <br>
. <br>
} <br>
总之,遵循以下步骤即可: <br>
类定义; <br>
extern TMemoEx memoex; <br>
TMemoEx *MemoEx; <br>
MemoEx=new TMemoEx(this); <br>
MemoEx->Parent=this; </font></td>
</tr>
</table>
<br>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -