无 无奈 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-31 #1 如何编写动态生成控件的事件处理(如OnDblClick等)?
H hawkview Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-31 #2 var testcombo:Timage; begin testimage:=Timage.create(self); testimage.ondbclick:=mydbclick; end; mydbclick为一自定义过程.
var testcombo:Timage; begin testimage:=Timage.create(self); testimage.ondbclick:=mydbclick; end; mydbclick为一自定义过程.
愚 愚夫 Unregistered / Unconfirmed GUEST, unregistred user! 2000-03-31 #5 事件处理程序实际上可以看作是一种特殊的属性,在动态 创建了控件后,就可以象给属性赋值一样,给其设置事件 处理程序。当然所赋的值,应该是相应的过程类型。