[問題] BCB動態產生物件拖曳控制
開發平台(Platform): (Ex: VC++, GCC, Linux, ...)
BCB XE2
小弟是最近接觸BCB的新手
找了板上的高手分享的方法成功產生動態物件
void __fastcall TForm1::Button1Click(TObject *Sender)
{
randomize();
img1=new TImage(Form1);
img1->Parent=Form1;
img1->Height=96;
img1->Width=71;
img1->Picture=Form1->Image1->Picture;
img1->Left=random(100)+80;
img1->Top=random(100)+80;
img1->OnClick = ImgOnClick; //所有Imageㄉonclick事件
img1->Tag = k;
k++;
}
現在如果想要個別控制物件拖曳動作的話
有沒有什麼比較好的方法呢?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.117.165.59
→
02/18 17:52, , 1F
02/18 17:52, 1F
推
02/19 21:46, , 2F
02/19 21:46, 2F