|
& C$ v9 U* g3 q9 n8 _
生成控件,然后设定控件对应的单击函数和双击函数 1 V. v, N% B* j% \) Q0 C) b9 v( ]
void __fastcall myImageClick(TObject *Sender)
( b8 e( P+ X3 ]$ I9 p8 f2 n/ Z9 D{ ( i, M i0 o: Q1 h1 g1 `
do what you want to do
* ^# t3 ^7 h6 q- ~2 N! J* q2 C}
" U( v( P" N! v, dTImage myImage=new TImage(); ! E" U) Z/ A2 X% k. n' h
myImage->parent=this;
/ F4 |& z( I& Y2 N, |$ _myImage->left=?? ! J# C! r- C( C8 \5 F7 B0 p
myImage->top=??
5 i5 A: N$ G H, T- b$ d3 n8 ]myImage->width=;
: p# ` Q0 l' A+ M" vmyImage->Height=;
: A8 @6 G8 f: f5 ^5 bmyImage->visible=true;
7 T7 I) {) F, }* [) VmyImage->OnClick=myImageClick;//动态绑定事件 + _) ] q- }* R; a" s$ ?; d
双击也类似 |