ＰＢ中系统热键（不管窗口是否有焦点）

最新推荐文章于 2020-04-13 14:32:33 发布

最新推荐文章于 2020-04-13 14:32:33 发布 · 134 阅读

文章标签：

#脚本

本文详细介绍了如何使用API函数注册热键，并在特定事件中进行响应，包括定义必要的函数、变量，以及实例化的注册过程。

-- Flystone 整理

首先定义ＡＰＩ

FUNCTIONIntegerGlobalAddAtom(refstringlpString)LIBRARY"kernel32.dll"ALIASFOR"GlobalAddAtomA"

FUNCTIONulongRegisterHotKey(ulonghwnd,ulongid,ulongfsModifiers,ulongvk)LIBRARY"user32.dll"

定义变量：

constantintegerMOD_ALT=1
constantintegerMOD_CONTROL=2
constantintegerMOD_SHIFT=4

intatomid[11]//用于放热键ＩＤ

注册热键，比如说在ＯＰＥＭ事件中：

longll_RC

stringls_str[11]

ls_str[1]="MyatomID0"

atomid[1]=GlobalAddAtom(ls_str[1])//得到唯一的ID，保证不和其他应用程序发生冲突 

ll_RC=RegisterHotKey(Handle(this),atomid[1],0,48)//0 

ls_str[2]="MyatomID1"

atomid[2]=GlobalAddAtom(ls_str[2])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[2],0,49)//1 

ls_str[3]="MyatomID2"

atomid[3]=GlobalAddAtom(ls_str[3])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[3],0,50)//2 

ls_str[4]="MyatomID3"

atomid[4]=GlobalAddAtom(ls_str[4])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[4],0,51)//3 

ls_str[5]="MyatomID4"

atomid[5]=GlobalAddAtom(ls_str[5])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[5],0,52)//4 

ls_str[6]="MyatomID5"

atomid[6]=GlobalAddAtom(ls_str[6])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[6],0,53)//5 

ls_str[7]="MyatomID6"

atomid[7]=GlobalAddAtom(ls_str[7])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[7],0,54)//6 

ls_str[8]="MyatomID7"

atomid[8]=GlobalAddAtom(ls_str[8])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[8],0,55)//7 

ls_str[9]="MyatomID8"

atomid[9]=GlobalAddAtom(ls_str[9])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[9],0,56)//8 

ls_str[10]="MyatomID9"

atomid[10]=GlobalAddAtom(ls_str[10])//得到唯一的ID 

ll_RC=ll_RC+RegisterHotKey(Handle(this),atomid[10],0,57)//9 

ls_str[11]="MyatomIDX"

ifll_RC<10then//这儿自行修改 

messagebox("错误","错误信息")

endif

响应OTHWE事件：

IFwparam=atomid[1]....THEN

//messagebox('','asdf') 

//你的脚本 
ENDIF