Re: [問題] 請問要怎麼樣讓按鈕會移動

[maplefog (楓霧)]

這個有二種解決方法 我講簡單這個，另一個是用DragDrop和DragOver

Button是動態產生也可以用

程式碼

void __fastcall TForm1::Button1MouseUp(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y)
{
        int WIDTH = ((TButton*)Sender)->Width;
        int HEIGHT = ((TButton*)Sender)->Height;

        ((TButton*)Sender)->Left = ((TButton*)Sender)->Left+X-WIDTH/2;
        ((TButton*)Sender)->Top = ((TButton*)Sender)->Top+Y-HEIGHT/2;
}

試試看吧

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.118.207.32
※ 編輯: maplefog        來自: 140.118.207.32       (08/22 23:30)
※ 編輯: maplefog        來自: 140.118.207.32       (08/22 23:32)
推 liu2007:請問TButton* 以及Sender是什麼東西呢?
推 joefaq:Sender就是那個按鈕 TButton*是該按鈕的Class 這邊用來轉型