窗口加滚动条-给窗口加上滚动条并响应滚动条操作

邓学彬

源码说明：
窗口上的子控件比较多、超出窗口显示范围时，
自动给窗口加上滚动条，并响应滚动条操作。
源码价值：学习子类化、消息处理、滚动条操作。
有比较详细的注释，方便新手学习。





源码下载：
窗口加滚动条_邓学彬(泪闯天涯).e (25.41 KB, 下载次数: 1270)

2018-10-19 19:36 上传

点击文件名下载附件

---

邓学彬(泪闯天涯)相关文章
[开源] 聊天气泡框模块源码 (高仿微信、QQ聊天的气泡聊天框)
[开源] 遮罩窗口 - 给窗口增加半透明模糊遮罩
[开源] 窗口阴影 - 给无边框窗口增加阴影
[开源] GDIPlus绘制LED时钟
[开源] GDIPlus绘制旋转七彩动画
[开源] GDIPlus绘制圆形进度条
[开源] GDIPlus转换图像格式 - 图像格式转换类模块
[开源] GDI例程 - 在窗口上画线
[开源] GDI例程 - 自动移动的线
[开源] GDI例程 - 仿黑ke帝国数字雨动画(简单版)
[开源] GDI例程 - 仿黑ke帝国数字雨动画(增强版)
[开源] 自绘树形框3例-指定项目颜色-自定义项目样式
[模块] 分组框美化模块 - 解决分组框字体BUG

邓学彬

修复BUG：窗口尺寸改变后，组件无法恢复原位。

  

子程序名	返回值类型	公开	备 注
WndScroll_UpdateScroll			更新滚动条，是否显示、滚动范围
参数名	类 型	参考	可空	数组	备 注
hWnd	整数型

GetScrollInfo (hWnd, #SB_VERT, si)  ' //获取纵向滚动条信息
如果真 (si.nPos ＞ 0 且 bVert ＝ 假)  ' //如果当前不需要纵向滚动条且滚动条位置大于0
ScrollWindow (hWnd, 0, si.nPos, 0, 0)  ' //还原窗口组件的位置
GetScrollInfo (hWnd, #SB_HORZ, si)  ' //获取横向滚动条信息
如果真 (si.nPos ＞ 0 且 bHorz ＝ 假)  ' //如果当前不需要横向滚动条且滚动条位置大于0
ScrollWindow (hWnd, si.nPos, 0, 0, 0)  ' //还原窗口组件的位置

.版本 2<br /> <br /> .子程序 WndScroll_UpdateScroll, , , 更新滚动条，是否显示、滚动范围<br /> .参数 hWnd, 整数型<br /> <br /> GetScrollInfo (hWnd, #SB_VERT, si)  ' //获取纵向滚动条信息<br /> .如果真 (si.nPos ＞ 0 且 bVert ＝ 假)  ' //如果当前不需要纵向滚动条且滚动条位置大于0<br />     ScrollWindow (hWnd, 0, si.nPos, 0, 0)  ' //还原窗口组件的位置<br /> .如果真结束<br /> GetScrollInfo (hWnd, #SB_HORZ, si)  ' //获取横向滚动条信息<br /> .如果真 (si.nPos ＞ 0 且 bHorz ＝ 假)  ' //如果当前不需要横向滚动条且滚动条位置大于0<br />     ScrollWindow (hWnd, si.nPos, 0, 0, 0)  ' //还原窗口组件的位置

更新源码下载：
窗口加滚动条_邓学彬(泪闯天涯).e (26.91 KB, 下载次数: 256)

2018-10-21 20:19 上传

点击文件名下载附件

oopsjeff

6666666666666666

shian

牛逼太牛逼了

Nick5469

学习一下

u88营销软件下载

回复下载 看看

Admi1049

学习下这个思路，感谢

薇沐啊

感谢分享

星空的物语

66666666666666666666666

星空的物语

6666666666666666666

笑笑笑不出来

横向滚动条的按钮 有错误,如何修改

笑笑笑不出来

支持开源~！感谢分享