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

韩冰

4 x" ^, ?' K5 A

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

void __fastcall myImageClick(TObject *Sender)

9 H, I6 p7 n9 G, S

{

2 |6 Z2 M( T8 u8 C( r X& S0 R* j

do what you want to do

' M" }/ g) u$ B. v2 `) z

}

TImage myImage=new TImage();

myImage->parent=this;

myImage->left=??

myImage->top=??

' @& w( }6 B" @% o3 M. M- H

myImage->width=;

5 N# Q6 _7 Y6 r8 ^) z

myImage->Height=;

S* ~" s" ?- x$ { m# X

myImage->visible=true;

5 S X1 o, T1 C P4 h

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

% ~: u/ E5 R& g& n/ `/ |# A

双击也类似