有誰可以跟我說該如何用C Builder寫這樣的程式， 是要用Events->OnMouseWheel嗎？ 還是要用到Events->OnCreate？ 裡面的內容又該怎麼寫？ 當我往上滾動時，捲軸向上移動；當我往下滾動時，捲軸向下移動， 如果我要讓滑鼠滾輪控制左右方向的捲軸， 當我按一下滾輪後， 往上滾動時，捲軸向左移動；往下滾動時，捲軸向右移動， 請大家幫幫忙，該如何寫這樣的程式 且一定要用C Builder 謝謝

ohmygod926 妳好：    妳的問題是針對某個特定元件還是所有的元件？      7 天天敲鍵盤 v 時時按滑鼠 8

沒有針對元件ㄟ 因為我是用TForm裡ㄉHorzScrollBar和VertScrollBar來用捲軸ㄉ 所以ㄅ知該怎麼寫

ohmygod926 妳好：    妳可以透過 Form 的 OnMouseWheel 事件來達到目的，以下是兩個範例，妳參考看看吧：

// 上下捲動
void __fastcall TForm1::FormMouseWheel(TObject *Sender, TShiftState Shift,
      int WheelDelta, TPoint &MousePos, bool &Handled)
{
    if (WheelDelta == WHEEL_DELTA) {
        Form1->Perform(WM_VSCROLL, SB_LINEUP, 0);
    } else if (WheelDelta == -WHEEL_DELTA) {
        Form1->Perform(WM_VSCROLL, SB_LINEDOWN, 0);
    }
}    // 左右捲動
void __fastcall TForm1::FormMouseWheel(TObject *Sender, TShiftState Shift,
      int WheelDelta, TPoint &MousePos, bool &Handled)
{
    if (WheelDelta == WHEEL_DELTA) {
        Form1->Perform(WM_HSCROLL, SB_LINELEFT, 0);
    } else if (WheelDelta == -WHEEL_DELTA) {
        Form1->Perform(WM_HSCROLL, SB_LINERIGHT, 0);
    }
}

7 天天敲鍵盤 v 時時按滑鼠 8

謝謝你哦！ 我有答案了...學校老師幫我解了

請問如果是想在DBGRID裡使用滾輪這個功能
但是我找不到MouseWheel這個EVENT怎麼辦

請參考：
http://delphi.ktop.com.tw/board.php?cid=30&fid=66&tid=18909


Fishman

------
Fishman