摘要:
Delphi的TScrollBox本身并不响应鼠标滚轮事件(不知道为什么),但可以在ScrollBox的鼠标滚动事件中进行控制:procedure TfrmTaskNoteEdit.ScrollBox1MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);begin if WheelDelta < 0 then SendMessage(scrollBox1.Handle,WM_VSCROLL, SB_L... 阅读全文
posted @ 2013-07-02 12:24
garfieldtom
阅读(3176)
评论(2)
推荐(0)
浙公网安备 33010602011771号