动态生成的控件如何响应鼠标事件

韩冰

生成控件,然后设定控件对应的单击函数和双击函数

, M$ u, D- R) v' X, t. W

void __fastcall myImageClick(TObject *Sender)

8 }9 {9 H' I7 _2 q" \. u7 d' A

{

do what you want to do

}

) W) \8 i. q, L, @2 ^

TImage myImage=new TImage();

myImage->parent=this;

& y! m4 m% Q+ Z8 ^" N: w2 u

myImage->left=??

6 e. f. {8 Q2 V9 V

myImage->top=??

3 r; l0 k* L; ]. K

myImage->width=;

3 o, y- J1 i# c4 I9 V, o

myImage->Height=;

' Z2 K5 e* ^3 @# r) T* _ A

myImage->visible=true;

myImage->OnClick=myImageClick;//动态绑定事件

& V' I1 [4 S; t4 y

双击也类似