如何动态生成控件实例？

Question

TComponent没有完成Assign的方法，所以除非使用RTTI（也只能针对Published的属性），否则你就得一个一个赋值，没什么其他的方法。

Answer 1

var
  query2: tquery;
begin
  query2:=query1;
  query2.assign(query1);
end;

Answer 2

TComponent的基类TPresits完成Assign的方法

Answer 3

没有，Assign方法其实也就是一个一个赋值。事实上TComponent及其所有的子类都没有完成Assign的方法，这也导致了控件无法拷贝。不信你就试试，应该会产生例外的。

Answer 4

var
  query2: tquery;
begin
  query2:=tquery.create(formname);
  query2.Parent=controlname;
end;