监听超级列表框表头鼠标右键

精意源码

超级列表框表头鼠标右键易语言内部没有事件，必须监听系统事件！

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
超级列表框_窗口过程

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

超级列表框_窗口过程 ＝ SetWindowLongA (超级列表框.取窗口句柄 (), -4, 到整数 (&超级列表框_窗口过程回调))

子程序名	返回值类型	公开	备 注
超级列表框_窗口过程回调	整数型
参数名	类 型	参考	可空	数组	备 注
hwnd	整数型
uMsg	整数型
wParam	整数型
lParam	整数型

变量名	类 型	静态	数组	备 注
pt	POINT

如果真 (uMsg ＝ 123 且 窗口_取类名 (取鼠标所在窗口句柄 ()) ＝ “SysHeader32”)
' 表头右键被单击
输出调试 (“表头右键被单击”)
返回 (CallWindowProcA (超级列表框_窗口过程, hwnd, uMsg, wParam, lParam))

i支持库列表	支持库注释
eAPI	应用接口支持库
e2ee	E2EE互联网服务器套件

.版本 2<br /> .支持库 eAPI<br /> .支持库 e2ee<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 超级列表框_窗口过程<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 超级列表框_窗口过程 ＝ SetWindowLongA (超级列表框.取窗口句柄 (), -4, 到整数 (&超级列表框_窗口过程回调))<br /> <br /> <br /> .子程序 超级列表框_窗口过程回调, 整数型<br /> .参数 hwnd, 整数型<br /> .参数 uMsg, 整数型<br /> .参数 wParam, 整数型<br /> .参数 lParam, 整数型<br /> .局部变量 pt, POINT<br /> <br /> .如果真 (uMsg ＝ 123 且 窗口_取类名 (取鼠标所在窗口句柄 ()) ＝ “SysHeader32”)<br />     ' 表头右键被单击<br />     输出调试 (“表头右键被单击”)<br /> .如果真结束<br /> 返回 (CallWindowProcA (超级列表框_窗口过程, hwnd, uMsg, wParam, lParam))

注意超级列表框_窗口过程需要是全局变量，或者保证超级列表框_窗口过程回调可以访问此变量即可

需要精易模块
DLL:

  

DLL命令名	返回值类型	公开	备 注
SetWindowLongA	整数型		改变指定窗口的属性，函数也将指定的一个32位值设置在窗口的额外存储空间的指定偏移位置。
DLL库文件名:
user32.dll
在DLL库中对应命令名:
SetWindowLongA
参数名	类 型	传址	数组	备 注
hWnd	整数型			窗口句柄及间接给出的窗口所属的类。
nIndex	整数型			指定将设定的大于等于0的偏移值。
dwNewLong	整数型			指定的替换值。

DLL命令名	返回值类型	公开	备 注
CallWindowProcA	整数型		呼叫窗口函数地址
DLL库文件名:
user32.dll
在DLL库中对应命令名:
CallWindowProcA
参数名	类 型	传址	数组	备 注
lpPrevWndFunc	整数型			前一窗口函数地址
hWnd	整数型			窗口句柄
Msg	整数型			消息值
wParam	整数型			附加参数1
lParam	整数型			附加参数2

.版本 2<br /> <br /> .DLL命令 SetWindowLongA, 整数型, "user32.dll", "SetWindowLongA", , 改变指定窗口的属性，函数也将指定的一个32位值设置在窗口的额外存储空间的指定偏移位置。<br />     .参数 hWnd, 整数型, , 窗口句柄及间接给出的窗口所属的类。<br />     .参数 nIndex, 整数型, , 指定将设定的大于等于0的偏移值。<br />     .参数 dwNewLong, 整数型, , 指定的替换值。<br /> <br /> .DLL命令 CallWindowProcA, 整数型, "user32.dll", "CallWindowProcA", , 呼叫窗口函数地址<br />     .参数 lpPrevWndFunc, 整数型, , 前一窗口函数地址<br />     .参数 hWnd, 整数型, , 窗口句柄<br />     .参数 Msg, 整数型, , 消息值<br />     .参数 wParam, 整数型, , 附加参数1<br />     .参数 lParam, 整数型, , 附加参数2