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

韩冰

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

. J* k1 K7 E7 S# P

void __fastcall myImageClick(TObject *Sender)

{

7 }- L$ e! Z' p* V

do what you want to do

2 k4 ]5 ?9 a5 M) q1 J Y

}

TImage myImage=new TImage();

+ k0 M' _2 ?+ F+ }0 E N

myImage->parent=this;

myImage->left=??

$ [2 T6 _6 P1 |3 D

myImage->top=??

" {4 J" L* O1 w; `+ ?- Q# u+ l# }

myImage->width=;

myImage->Height=;

1 ]8 r# {' G/ }" Y& ~! ^

myImage->visible=true;

3 w% K% e" V4 E

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

# |: V2 C2 r% O8 T5 J- @

双击也类似