|
7 U) ?1 X" G, ]2 L% }% E
生成控件,然后设定控件对应的单击函数和双击函数
6 [0 d; B4 K" ]8 N4 avoid __fastcall myImageClick(TObject *Sender) ; `6 m$ T; W* {& T' L
{
V5 q' `0 Z* b: Y! Y6 q; Q, W do what you want to do ! y! ^( W( u( I1 M* j9 I
} , K. X9 p, N( E0 E/ D7 P( c" L
TImage myImage=new TImage();
( |' v6 |5 h! |$ |/ H7 CmyImage->parent=this;
0 r$ @+ N P. G: DmyImage->left=??
% j- P5 J; q9 `* _& ?4 nmyImage->top=??
$ h1 Q) E! B1 g0 g5 fmyImage->width=; 5 Z! K# g& Z1 K+ }0 y& R8 n
myImage->Height=; C! ^% x* X/ {! z
myImage->visible=true;
, a7 G( q. W2 e. }: D& umyImage->OnClick=myImageClick;//动态绑定事件
- F- x" b' m: w9 s双击也类似 |