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

韩冰

( F* s/ W! G, y7 M6 P

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

void __fastcall myImageClick(TObject *Sender)

6 n0 P$ S* J$ h/ c' r8 y! Q

{

do what you want to do

}

TImage myImage=new TImage();

1 ~) P/ \- E3 j1 Q/ i C: t

myImage->parent=this;

myImage->left=??

myImage->top=??

1 X( K T( C% Z' Q

myImage->width=;

$ E }, n6 k, x

myImage->Height=;

" ~ S% P+ J1 O

myImage->visible=true;

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

双击也类似