摘要： 在鼠标的MouseWheel事件里写入以下内容if WheelDelta < 0 then SendMessage(scrollBox1.Handle, WM_VSCROLL, SB_LINEDOWN, 0) //向下滚 else SendMessage(scrollBox1.Handle, WM_... 阅读全文