|
) U6 t# j% b0 m9 E# g
生成控件,然后设定控件对应的单击函数和双击函数 * [5 K3 e8 g# [' a1 o( }; |
void __fastcall myImageClick(TObject *Sender)
3 T4 V- S+ S( J7 q{
0 x R# e( ^9 e% z- _ do what you want to do
2 `6 F" y* T& t/ E) W- m, {}
7 Z4 r7 ]2 O. _# u% e4 a. lTImage myImage=new TImage(); ) \5 [; w# e$ a/ X+ D
myImage->parent=this;
9 h1 M9 ]9 T+ B9 EmyImage->left=??
% r$ Q9 |7 ~, l% JmyImage->top=??
7 O4 o" i) _1 V+ S9 p( t* qmyImage->width=;
) o4 i3 {4 N. |+ m' P' E% UmyImage->Height=; : A W8 i6 v: L h% V" e! V) m
myImage->visible=true; ! ^( y! N8 K! z& ^- ~9 ] Z0 Q
myImage->OnClick=myImageClick;//动态绑定事件 9 v8 s* E+ h f: F0 J
双击也类似 |