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

韩冰

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

/ K" j9 q0 j0 Y* M, u4 q

void __fastcall myImageClick(TObject *Sender)

7 E. w- } E, [8 r

{

do what you want to do

}

TImage myImage=new TImage();

myImage->parent=this;

myImage->left=??

myImage->top=??

myImage->width=;

4 u, z+ {5 o( Y0 o

myImage->Height=;

' o& f) s0 T+ W1 V3 @7 q3 [

myImage->visible=true;

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

双击也类似