|
! ]5 D3 U6 ]' K+ b0 [
生成控件,然后设定控件对应的单击函数和双击函数 / e% e5 K, W5 ]+ @
void __fastcall myImageClick(TObject *Sender)
2 W# e% ], O) ?' H% X{
7 g9 {& _& `. a' K do what you want to do ~* z' v a; |' E
}
/ O' b1 y. K4 W! d- ?: {! sTImage myImage=new TImage();
+ H# T+ I" w) JmyImage->parent=this; 0 M/ R# x' F' A. p1 N
myImage->left=??
) D" w: [- Y% \. g% L. HmyImage->top=??
: M; b7 a; j: @myImage->width=;
5 ~4 a6 `% i( N }2 CmyImage->Height=; + T2 N. r# m! R q1 u$ w. U9 }
myImage->visible=true;
/ i0 K! ?0 W& a$ b RmyImage->OnClick=myImageClick;//动态绑定事件 + K S6 X8 w1 J3 K; a% _
双击也类似 |