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

韩冰

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

void __fastcall myImageClick(TObject *Sender)

{

9 V- L/ g3 w4 u# u9 H5 S! `$ {+ P

do what you want to do

}

TImage myImage=new TImage();

# d* |, \! Y0 a9 ?6 o

myImage->parent=this;

myImage->left=??

myImage->top=??

. O6 n* `. [ E. y: K

myImage->width=;

myImage->Height=;

myImage->visible=true;

" k7 {5 Y. P4 S* ^: D& W1 f* D

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

Z! C8 o, ], I+ ?

双击也类似