____________如何动态创建控件
本帖最后由 Biner 于 2013-10-5 23:54 编辑如1,何动态创建控件,2,设置控件属性,3,建立控件相关响应事件,4,执行相关响应事件。??????
//用代码创建一个按钮
procedure TForm1.FormShow(Sender: TObject);
var
mybutton : TButton ;
begin
mybutton := TButton.Create(Self);
with mybutton do
begin
Parent := form1 ;
Align := altop ;
Caption := '这是一个代码创建的控件' ;
end ;
end;
用代码创建控件,设置控件属性 都好了,
3,建立控件相关响应事件,4,执行相关响应事件, 怎么做呢?
支持一下不错的 呵呵现在已经会了,谢谢关心哦 顶·~~~~~~~~~~~~ {:1_1:}这个问题支持下啊 (mybutton as Tbutton).click:lol: 积分测试中。。。。 太难了,路过 真是高大上,厉害厉害 太没挑战性! 人品木有,鱼币拿走 强烈支持楼主ing…… 希望学习一段时间后能知道答案 何动态创建控件 感谢分享~! 来拿鱼b的。。。 看看。。。。 看看 楼主,新人试运气来了,共同进步撒~ 路过~~