急急：关于动态生成的控件的问题

Question

高手：我现在在FORM上动态生成了几个BUTTON控件，但是我该如何使用这些动态生成的控件，让他们响应一些事件，如鼠标事件，双击等。请指导！

Answer 1

var
   mybtn:TButton;
begin
   mybtn:=TButton.Create(self);
   with mybtn do
   begin
      Parent := form1;
      caption := 'DynCreateBtn';
      Width := 100;
      Height:= 20;
      OnClick:=myOnClick;
  end;
end;
procedure myOnClick(Sender:TObject);
begin
    showmessage('You Click Dynamic Create Button');
end;

Answer 2

自定义一系列过程
然后赋给 Button的相关事件
注意参数的类型,顺序,个数和事件保持一致

Answer 3

hoho这问题精华区中就有答案啊