在程序中动态创建的控件，什么怎么生成这个控件的事件

Question

大概是把OnXXXX := (ProcedureName)

Answer 1

比如button的onclick事件
你定义一个过程
procedure MyOnClick(Sender: TObject);
然后Button.onclick := MyOnClick;

Answer 2

过程参数要相同,比如控件的事件处理句柄是TEventNotify,你定义的过程也要是TEventNotify

Answer 3

就是比如动态生成一个edit控件，然后我想再生成触发的onchange事件，

Answer 4

一样的,动态生成edit
然后
edit.onchange := myonchage

Answer 5

如果myonchang的执行也要动态生成呢？？？

Answer 6

procedure MyOnClickProc(Sender: TObject); //注意Sender:Tobject不能少
begin
..........
end;然后Button.onclick := MyOnClickProc; //onclick是个事件指针,针向MyOnClickProc即可