关于网友提出的“ 两个关于动态按钮的问题?”问题疑问,本网通过在网上对“ 两个关于动态按钮的问题?”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:
问题: 两个关于动态按钮的问题?
描述: 我用数组创建了几个动态按钮,现想请教两个问题?
按钮分别为:button[1] , button[2] , button[3] ....button[10]
第一:当我按其中第M个动态创建的按钮,我要怎样得到当前是第几个呢?
第二: 当我关闭当前的forms时,对于这些动态创建的按钮是否要进行处理,比如释放资源之类的操作,是什么呢?
解决方案1: 1:
procedure TForm1.Button1Click(Sender: TObject);
begin
showMessage(inttostr(TButton(Sender).Tag));
showMessage(inttostr(TButton(Sender).Name));
end;
创建按钮.......然后
Button2.tag:=2;
Button3.tag:=3;
....
Button2.OnClick :=Button1Click;
Button3.OnClick :=Button1Click;
.........
2:button2:=TButton.create(self); 释放交给父窗体
如果是button2:=TButton.create(nil);要自己释放
以上介绍了“ 两个关于动态按钮的问题?”的问题解答,希望对有需要的网友有所帮助。
本文网址链接:http://www.codes51.com/itwd/2696657.html