超级列表框问题

我很低调

如何屏蔽超级列表框的横纵向滚动条

gm06

属性那里不是可以设置吗？

cunanhai

  

DLL命令名	返回值类型	公开	备 注
ShowScrollBar	整数型		公开
DLL库文件名:
user32.dll
在DLL库中对应命令名:
ShowScrollBar
参数名	类 型	传址	数组	备 注
hWnd	整数型
wBar	整数型
bShow	整数型

.版本 2<br /> <br /> .DLL命令 ShowScrollBar, 整数型, "user32.dll", "ShowScrollBar", , 公开<br />     .参数 hWnd, 整数型<br />     .参数 wBar, 整数型<br />     .参数 bShow, 整数型

  

ShowScrollBar (超级列表框1.取窗口句柄 (), 3, 0)

ShowScrollBar (超级列表框1.取窗口句柄 (), 3, 0)

微信的木头人

cunanhai 发表于 2026-6-9 22:54
[e=0].版本 2

.DLL命令 ShowScrollBar, 整数型, "user32.dll", "ShowScrollBar", , 公开

测试没用阿

xingyang

.版本 2

.子程序 超列_隐藏滚动条, 逻辑型, 公开
.参数 hwnd, , , 句柄
.局部变量 指针

指针 ＝ SetWindowLongA (hwnd, -4, 到整数 (&QH_Callback_Cross))
返回 (SetPropA (hwnd, “Call function”, 指针))

.子程序 QH_Callback_Cross, 整数型
.参数 hwnd, , , 句柄
.参数 ptype, , , 消息类型
.参数 param1
.参数 param2
.局部变量 指针

指针 ＝ GetPropA (hwnd, “Call function”)
.如果真 (ptype ＝ 15 或 ptype ＝ 131)
    ShowScrollBar (hwnd, 0, 假)  ' 横向
    ShowScrollBar (hwnd, 1, 假)  ' 纵向
.如果真结束
返回 (CallWindowProcA (指针, hwnd, ptype, param1, param2))