|
; `7 S: `& C, s3 ~: ? p# I
生成控件,然后设定控件对应的单击函数和双击函数 1 B3 q! O. D: Q2 Q3 D: I* Y( h
void __fastcall myImageClick(TObject *Sender) : [* _" A" I+ J
{
& x& Z) M2 z! g5 ^ do what you want to do ( c5 ]/ n( W7 g8 e
}
& @% I5 o$ _& l2 w6 G4 ~4 yTImage myImage=new TImage();
0 M( z- o! N* C" t0 VmyImage->parent=this; ' F7 X, ~8 J N
myImage->left=?? u5 p( w& d) J# E
myImage->top=??
* |" m/ ^* s" p7 K; H- [myImage->width=;
/ q7 {: K1 f4 n% b& CmyImage->Height=;
* [2 ^+ B$ n c' j2 Q. cmyImage->visible=true; 7 J, O: x8 w+ Y2 w( `+ z
myImage->OnClick=myImageClick;//动态绑定事件
# r# b; |, }4 T7 O双击也类似 |