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

韩冰

9 c' M1 p% y. @ G6 v

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

void __fastcall myImageClick(TObject *Sender)

{

" Z! e: E7 o( F% t9 E8 u' P

do what you want to do

}

! p! Y5 G% B) j: g& y( r# d+ G) Q8 r

TImage myImage=new TImage();

myImage->parent=this;

- P" ^- o$ i* }; F& ?

myImage->left=??

myImage->top=??

myImage->width=;

5 Y% C* g. F& Z9 J! c2 \0 V

myImage->Height=;

myImage->visible=true;

& t1 o. }- l7 A+ C

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

8 z- v' _/ O0 r

双击也类似