鼠标_改指针 窗口_更换鼠标指针

陈炳强

如果已支持请忽略,我用的7.2模块这两个命令都是要提供文件路径改鼠标指针,提供的命令忘记在哪下的源码了,非本人原创,支持使用常量或文件设置鼠标指针

  

子程序名	返回值类型	公开	备 注
设置光标
参数名	类 型	参考	可空	数组	备 注
窗口句柄	整数型
光标指针	整数型				#鼠标指针_
路径光标	文本型				后缀名为:ani\cur的鼠标指针文件路径

变量名	类 型	静态	数组	备 注
光标	整数型
子句柄	整数型		0
i	整数型

如果 (是否为空 (路径光标))
光标 ＝ LoadCursorW (0, 光标指针)
光标 ＝ LoadCursorFromFileA (路径光标)
窗口_枚举子窗口 (窗口句柄, 子句柄, )
计次循环首 (取数组成员数 (子句柄), i)
SetClassLongA (子句柄 [i], -12, 光标)
计次循环尾 ()
SetClassLongA (窗口句柄, -12, 光标)

.版本 2<br /> <br /> .子程序 设置光标<br /> .参数 窗口句柄, 整数型<br /> .参数 光标指针, 整数型, 可空, #鼠标指针_<br /> .参数 路径光标, 文本型, 可空, 后缀名为:ani\cur的鼠标指针文件路径<br /> .局部变量 光标, 整数型<br /> .局部变量 子句柄, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> <br /> .如果 (是否为空 (路径光标))<br />     光标 ＝ LoadCursorW (0, 光标指针)<br /> .否则<br />     光标 ＝ LoadCursorFromFileA (路径光标)<br /> .如果结束<br /> 窗口_枚举子窗口 (窗口句柄, 子句柄, )<br /> .计次循环首 (取数组成员数 (子句柄), i)<br />     SetClassLongA (子句柄 <i>, -12, 光标)<br /> .计次循环尾 ()<br /> SetClassLongA (窗口句柄, -12, 光标)

  

DLL命令名	返回值类型	公开	备 注
LoadCursorW	整数型		该函数从一个与应用事例相关的可执行文件（EXE文件）中载入指定的光标资源。该函数已被Loadlmage函数替代。
DLL库文件名:
user32.dll
在DLL库中对应命令名:
LoadCursorW
参数名	类 型	传址	数组	备 注
hInstance	整数型			标识一个模块事例，它的可执行文件包含要载入的光标
lpCursorName	整数型			指向以NULL结束的字符串的指针，该字符串存有等载入的光标资源名。常量 #IDC_ 开头

DLL命令名	返回值类型	公开	备 注
SetClassLongA	整数型
DLL库文件名:
在DLL库中对应命令名:
SetClassLongA
参数名	类 型	传址	数组	备 注
hwnd	整数型
nIndex	整数型
dwNewLong	整数型			类信息的新值

DLL命令名	返回值类型	公开	备 注
LoadCursorFromFileA	整数型		创建一个鼠标指针
DLL库文件名:
在DLL库中对应命令名:
LoadCursorFromFileA
参数名	类 型	传址	数组	备 注
lpFileName	文本型			包含指针的那个文件的名字

.版本 2<br /> <br /> .DLL命令 LoadCursorW, 整数型, "user32.dll", "LoadCursorW", , 该函数从一个与应用事例相关的可执行文件（EXE文件）中载入指定的光标资源。该函数已被Loadlmage函数替代。<br />     .参数 hInstance, 整数型, , 标识一个模块事例，它的可执行文件包含要载入的光标<br />     .参数 lpCursorName, 整数型, , 指向以NULL结束的字符串的指针，该字符串存有等载入的光标资源名。常量 #IDC_ 开头<br /> <br /> .DLL命令 SetClassLongA, 整数型, , "SetClassLongA", 公开<br />     .参数 hwnd, 整数型<br />     .参数 nIndex, 整数型<br />     .参数 dwNewLong, 整数型, , 类信息的新值<br /> <br /> .DLL命令 LoadCursorFromFileA, 整数型, , "LoadCursorFromFileA", 公开, 创建一个鼠标指针<br />     .参数 lpFileName, 文本型, , 包含指针的那个文件的名字

  

常量名称	常量值	公 开	备 注
鼠标指针_标准型	32512	√	标准的箭头IDC_ARROW
鼠标指针_文本编辑型	32513	√	文本编辑IDC_IBEAM
鼠标指针_沙漏型	32514	√	沙漏IDC_WAIT
鼠标指针_十字型	32515	√	十字光标IDC_CROSS
鼠标指针_UPARROW	32516	√	向上垂直箭头IDC_UPARROW
鼠标指针_SIZENWSE	32642	√	双箭头指向西北和东南IDC_SIZENWSE
鼠标指针_SIZENESW	32643	√	双箭头指向东北和西南IDC_SIZENESW
鼠标指针_SIZEWE	32644	√	双箭头指向西和东IDC_SIZEWE
鼠标指针_SIZENS	32645	√	双箭头指向南北IDC_SIZENS
鼠标指针_四向箭头	32646	√	四向箭头指向东、西、南、北IDC_SIZEALL
鼠标指针_禁止型	32648	√	禁止圈IDC_NO
鼠标指针_手型	32649	√	手型IDC_HAND
鼠标指针_APPSTARTING	32650	√	标准的箭头和小沙漏IDC_APPSTARTING
鼠标指针_帮助	32651	√	箭头和问号IDC_HELP

.版本 2<br /> <br /> .常量 鼠标指针_标准型, "32512", 公开, 标准的箭头IDC_ARROW<br /> .常量 鼠标指针_文本编辑型, "32513", 公开, 文本编辑IDC_IBEAM<br /> .常量 鼠标指针_沙漏型, "32514", 公开, 沙漏IDC_WAIT<br /> .常量 鼠标指针_十字型, "32515", 公开, 十字光标IDC_CROSS<br /> .常量 鼠标指针_UPARROW, "32516", 公开, 向上垂直箭头IDC_UPARROW<br /> .常量 鼠标指针_SIZENWSE, "32642", 公开, 双箭头指向西北和东南IDC_SIZENWSE<br /> .常量 鼠标指针_SIZENESW, "32643", 公开, 双箭头指向东北和西南IDC_SIZENESW<br /> .常量 鼠标指针_SIZEWE, "32644", 公开, 双箭头指向西和东IDC_SIZEWE<br /> .常量 鼠标指针_SIZENS, "32645", 公开, 双箭头指向南北IDC_SIZENS<br /> .常量 鼠标指针_四向箭头, "32646", 公开, 四向箭头指向东、西、南、北IDC_SIZEALL<br /> .常量 鼠标指针_禁止型, "32648", 公开, 禁止圈IDC_NO<br /> .常量 鼠标指针_手型, "32649", 公开, 手型IDC_HAND<br /> .常量 鼠标指针_APPSTARTING, "32650", 公开, 标准的箭头和小沙漏IDC_APPSTARTING<br /> .常量 鼠标指针_帮助, "32651", 公开, 箭头和问号IDC_HELP

乐从何来

666666666666666666666666666

van944527

这个对我这个初学者有些用

项目部004

下期版本发布前给这两个命令增加设置参数，感谢建议与提供！

陈炳强

刺秦 发表于 2019-11-16 09:23
使用最新版的精易模块

7.7的看了也是只有使用文件更换