动态生成控件的问题~
时间:2011-11-29
来源:互联网
有一个PageControl1控件,其中一个TabSheet1上有一些如richedit,button等控件。
应该如何在新的tbaSheet2控件上自动创建TabSheet1上的所有控件及它们的运行函数,如Button的点击~
应该如何在新的tbaSheet2控件上自动创建TabSheet1上的所有控件及它们的运行函数,如Button的点击~
作者: hoxogo 发布时间: 2011-11-29
var BtnTest:TButton;
begin
btnTest := TButton.Create(self);
btnTest.Parnet := TabSheet2;
BtnTest.Caption := '测试';
BtnTest.Name := 'xxxx';
BtnTest.Onclick := 你自定义的事件名称;
end;
大致应该是这样
begin
btnTest := TButton.Create(self);
btnTest.Parnet := TabSheet2;
BtnTest.Caption := '测试';
BtnTest.Name := 'xxxx';
BtnTest.Onclick := 你自定义的事件名称;
end;
大致应该是这样
作者: case5166 发布时间: 2011-11-29
控件.ParentWindow := tabsheet2.Handle;
tabsheet2.InsertControl(控件);
tabsheet2.InsertControl(控件);
作者: bdmh 发布时间: 2011-11-29
如果同样的控件生成较多,可以用数组来管理,比如Button数组,尤其是如果用同样的OnClick函数时,你可以遍历数组来找到谁是Sender。
作者: lhylhy 发布时间: 2011-11-29


作者: case5166 发布时间: 2011-11-29
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28