动态创建的一个VCL控件中的事件怎么相应

动态创建的一个VCL控件中的事件如何相应
动态创建的一个VCL控件中的事件如何相应

比如说一个Button的OnClick事件

谢谢了



------解决方案--------------------
button.onclick
------解决方案--------------------
procedure MyClick(Sender: TObject);
begin
xxxxx;
end;


button1.OnClick := MyClick;