onlyou13

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理
  85 随笔 :: 22 文章 :: 0 评论 :: 41005 阅读

06 2020 档案

发送鼠标滚轮消息
摘要：procedure SendMouseWheel(destHandle: THandle; goUp: Boolean); var message: TWMMouseWheel; delta: SmallInt; begin if goUp then delta := WHEEL_DELTA els 阅读全文
posted @ 2020-06-30 14:10 onlyou13 阅读(646) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示