超级列表框代码模拟鼠标拖动表头列

TIANL

代码是下面这样的，还需要自己创建一个超级列表框，添加3列，想省事可以直接附件下载代码

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
新列顺序	整数型		0
内存地址	整数型

' 表列有几列，修改的列顺序就得有几列，否则修改失败，比如超级列表框有三列，数组成员就得有三位
新列顺序 ＝ { 2, 0, 1 }  ' 列号从0开始，第一列对应0，第二列对应1，第三列对应2，想将第三列放到首位，就把原本列序号2放到首位，依次类推
内存地址 ＝ 申请内存 (取数组成员数 (新列顺序) × 4, 真)  ' 申请一块共享内存保存新列顺序的数组，以便稍后能被系统读取
内存_写到内存 (内存地址, 取变量数据地址 (新列顺序), 取数组成员数 (新列顺序) × 4)  ' 将数据写入到共享内存
超级列表框1.发送信息 (4154, 取数组成员数 (新列顺序), 内存地址)  ' 发送消息，让系统帮忙修改
释放内存 (内存地址)  ' 修改完成后记得释放内存，避免内存泄露
超级列表框1.重画 ()  ' 修改后需要刷新才能正确显示，否则会显示错误的表头与表数据关系

子程序名	返回值类型	公开	备 注
内存_写到内存			高段地址可使用 内存_修改内存（）
参数名	类 型	参考	可空	数组	备 注
参_目的地址	整数型				目的地址的缓冲区长度需大于或等于长度
参_源地址	整数型				用于写入到目的地址的 数据的指针
参_长度	整数型				需要写入的长度

置入代码 ({ 96, 139, 77, 16, 139, 125, 8, 139, 117, 12, 243, 164, 97 })
' pushad
' mov ecx , dword ptr [ebp+0x10]
' mov edi , dword ptr [ebp+0x08]
' mov esi , dword ptr [ebp+0x0C]
' rep movsb
' popad

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 新列顺序, 整数型, , "0"<br /> .局部变量 内存地址, 整数型<br /> <br /> ' 表列有几列，修改的列顺序就得有几列，否则修改失败，比如超级列表框有三列，数组成员就得有三位<br /> 新列顺序 ＝ { 2, 0, 1 }  ' 列号从0开始，第一列对应0，第二列对应1，第三列对应2，想将第三列放到首位，就把原本列序号2放到首位，依次类推<br /> 内存地址 ＝ 申请内存 (取数组成员数 (新列顺序) × 4, 真)  ' 申请一块共享内存保存新列顺序的数组，以便稍后能被系统读取<br /> 内存_写到内存 (内存地址, 取变量数据地址 (新列顺序), 取数组成员数 (新列顺序) × 4)  ' 将数据写入到共享内存<br /> 超级列表框1.发送信息 (4154, 取数组成员数 (新列顺序), 内存地址)  ' 发送消息，让系统帮忙修改<br /> 释放内存 (内存地址)  ' 修改完成后记得释放内存，避免内存泄露<br /> 超级列表框1.重画 ()  ' 修改后需要刷新才能正确显示，否则会显示错误的表头与表数据关系<br /> <br /> <br /> .子程序 内存_写到内存, , 公开, 高段地址可使用 内存_修改内存（）<br /> .参数 参_目的地址, 整数型, , 目的地址的缓冲区长度需大于或等于长度<br /> .参数 参_源地址, 整数型, , 用于写入到目的地址的 数据的指针<br /> .参数 参_长度, 整数型, , 需要写入的长度<br /> <br /> 置入代码 ({ 96, 139, 77, 16, 139, 125, 8, 139, 117, 12, 243, 164, 97 })<br /> ' pushad<br /> ' mov ecx , dword ptr [ebp+0x10]<br /> ' mov edi , dword ptr [ebp+0x08]<br /> ' mov esi , dword ptr [ebp+0x0C]<br /> ' rep movsb<br /> ' popad

补充内容 (2025-3-23 23:38):
置顶评论有模拟鼠标拖动表头的两种版本，需要下载代码去置顶的评论（10楼）下载

TIANL

function888 发表于 2025-3-22 19:04
发送信息拖动行的例子有吗

代码如下，想省事可以附件下载源码

  

子程序名	返回值类型	公开	备 注
模拟鼠标移动表头
参数名	类 型	参考	可空	数组	备 注
参_超级列表框句柄	整数型
参_欲移动的列号	整数型

变量名	类 型	静态	数组	备 注
表头句柄	整数型
内存地址	整数型
rect	矩形

表头句柄 ＝ SendMessageA (参_超级列表框句柄, 4127, 0, 0)  ' LVM_GETHEADER=4127，获取表头句柄
内存地址 ＝ 申请内存 (16, 真)  ' 申请共享内存，以便稍后系统将矩形数据写入
SendMessageA (表头句柄, 4615, 参_欲移动的列号, 内存地址)  ' HDM_GETITEMRECT=4615，向系统申请获取表头指定列号的矩形数据
写到内存 (内存地址, 取变量地址 (rect), 16)  ' 将获取到的矩形数据写入本程序变量，方便以原生方式调用
SendMessageA (表头句柄, 513, 1, 坐标消息 (rect.左边 ＋ 8, rect.顶边 ＋ 4))  ' 发送消息，让系统帮忙在指定坐标按下鼠标左键，+8，+4是偏移点击坐标，保证点击的部位是表头，而不是表头间隔线
SendMessageA (表头句柄, 512, 1, 坐标消息 (8, 4))  ' 发送消息，让系统帮忙移动鼠标到指定坐标
SendMessageA (表头句柄, 514, 0, 坐标消息 (8, 4))  ' 发送消息，让系统帮忙松开鼠标左键
释放内存 (内存地址)  ' 记得释放申请的共享内存，避免内存泄露

子程序名	返回值类型	公开	备 注
坐标消息	整数型		将坐标转为消息
参数名	类 型	参考	可空	数组	备 注
x	整数型
y	整数型

返回 (x ＋ y × 65536)  ' Windows坐标参数格式：低位字为x，高位字为y

DLL命令名	返回值类型	公开	备 注
SendMessageA	整数型		将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。
DLL库文件名:
user32.dll
在DLL库中对应命令名:
SendMessageA
参数名	类 型	传址	数组	备 注
hWnd	整数型			其窗口程序将接收消息的窗口的句柄。
Msg	整数型			指定被发送的消息。
wParam	整数型			指定附加的消息特定信息。
lParam	整数型			指定附加的消息特定信息。

i支持库列表	支持库注释
ogrelib	DirectX3D支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 ogrelib<br /> .支持库 spec<br /> <br /> .子程序 模拟鼠标移动表头<br /> .参数 参_超级列表框句柄, 整数型<br /> .参数 参_欲移动的列号, 整数型<br /> .局部变量 表头句柄, 整数型<br /> .局部变量 内存地址, 整数型<br /> .局部变量 rect, 矩形<br /> <br /> 表头句柄 ＝ SendMessageA (参_超级列表框句柄, 4127, 0, 0)  ' LVM_GETHEADER=4127，获取表头句柄<br /> 内存地址 ＝ 申请内存 (16, 真)  ' 申请共享内存，以便稍后系统将矩形数据写入<br /> SendMessageA (表头句柄, 4615, 参_欲移动的列号, 内存地址)  ' HDM_GETITEMRECT=4615，向系统申请获取表头指定列号的矩形数据<br /> 写到内存 (内存地址, 取变量地址 (rect), 16)  ' 将获取到的矩形数据写入本程序变量，方便以原生方式调用<br /> SendMessageA (表头句柄, 513, 1, 坐标消息 (rect.左边 ＋ 8, rect.顶边 ＋ 4))  ' 发送消息，让系统帮忙在指定坐标按下鼠标左键，+8，+4是偏移点击坐标，保证点击的部位是表头，而不是表头间隔线<br /> SendMessageA (表头句柄, 512, 1, 坐标消息 (8, 4))  ' 发送消息，让系统帮忙移动鼠标到指定坐标<br /> SendMessageA (表头句柄, 514, 0, 坐标消息 (8, 4))  ' 发送消息，让系统帮忙松开鼠标左键<br /> 释放内存 (内存地址)  ' 记得释放申请的共享内存，避免内存泄露<br /> <br /> .子程序 坐标消息, 整数型, , 将坐标转为消息<br /> .参数 x, 整数型<br /> .参数 y, 整数型<br /> <br /> 返回 (x ＋ y × 65536)  ' Windows坐标参数格式：低位字为x，高位字为y<br /> <br /> .版本 2<br /> <br /> .DLL命令 SendMessageA, 整数型, "user32.dll", "SendMessageA", , 将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。<br />     .参数 hWnd, 整数型, , 其窗口程序将接收消息的窗口的句柄。<br />     .参数 Msg, 整数型, , 指定被发送的消息。<br />     .参数 wParam, 整数型, , 指定附加的消息特定信息。<br />     .参数 lParam, 整数型, , 指定附加的消息特定信息。

please

感谢分享，支持开源！！！

李泽勇2

列可以交换位置，但是有研究怎么保存位置。

李泽勇2

楼主有研究怎么保存超级列表框的列顺序吗？

pipicool

学习一下

皮皮君

RE: 自制的一个帮助文档。方便记录学习的知识 [修改]

TIANL

function888 发表于 2025-3-22 19:04
发送信息拖动行的例子有吗

有的，有的

year1970

感谢分享

function888

发送信息拖动行的例子有吗