Question

delphi动态复制一个控件

简单说通过事件动态的把from1的所有控件复制到空白的form2上。怎么弄？手机只能开20分，解决问题了分好说。
这是一个办法，但这个办法不是个好办法啊，因为太麻烦了。

希望得到简单点的办法。。。。。

Answer 1

为什么非要form2呢，把form1重新创建一个窗口就行了。
1、改一改Form1，在var里加一个form2变量：
Form1,Form2: TForm1;
2、在想生成的地方加上：
Application.CreateForm(TForm1, Form2);
Form2.show;
就可以了。

Answer 2

遍历 controls ，然后动态添加到 form2上面

Answer 3

貌似只能遍历了.