大家好: 我使用TDrawGrid 並將DragMode 設定為dmManual(手動模式), 在MouseMove中我偵測使用者是否有按下左鍵,以表示現在是拖曳狀態, 此時我想要改變滑鼠游標為crDrag(拖曳圖示), 但圖沒改變, 直到放開後才會改變,不知如何能即時改變此游標? 因為設計上的問題,所以不想用dmAutomatic(自動模式),但游標卻無法即時更換. 我使用下列語法: DrawGrid->Cursor = crDrag;

------
FPGA驗證, FPGA開發平台, http://smims.com

或許您試試在 OnMouseDown event 做這件事：

void __fastcall TForm1::DrawGrid1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
    if (Button == mbLeft)
        DrawGrid1->BeginDrag(false);
}

謝謝你的回應.. 我試過你的方法,但此模式就會變成mdAutomatic的狀態一樣, 此時會無法偵測MouseMove, 因為我想在MouseMove做些事, 所以只要改變滑鼠游標即可...

------
FPGA驗證, FPGA開發平台, http://smims.com

void __fastcall TForm1::Label1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
    TPoint P;        if (Button == mbLeft)
    {
        Label1->Cursor = crDrag;            GetCursorPos(&P);
        P = ScreenToClient(P);
        Perform(WM_LBUTTONUP, 0, (int)&P);
    }
}

謝謝回應... 我有試了, 你使用WM_LBUTTONUP, 是等放開時改變圖示, 我是想按下去後,在MouseMove判斷是否要改變圖示,因為拖曳時,滑鼠的Button 是都不動的,所以無法使用此法. 我也試過使用WM_MOUSEMOVE, 但還是沒變.

------
FPGA驗證, FPGA開發平台, http://smims.com

我想那您可能改變 Screen->Cursor 來試試看，程式大致如下：

void __fastcall TForm1::Memo1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y)
{
    TPoint P;
    if (blMouseDown) /* 請改成您判斷滑鼠被按下的條件 */
    {
        /* 如果滑鼠在 Memo1 範圍內就變圖示 */
        if (X > 0 && X < Memo1->Width && Y > 0 && Y < Memo1->Height)
            Screen->Cursor = crDrag;
        /* 如果滑鼠超出 Memo1 範圍就變回來 */
        else
            Screen->Cursor = crDefault;
    }
}

謝了! 這樣的確是可以達到我要的目的!

------
FPGA驗證, FPGA開發平台, http://smims.com