用RegisterHotKey在多对话框页面注册如何注册全局热键。

lcy_888 2013-04-23 02:35:46
在一基于对话框的程序中使用TAB控件并加入四个子对话框作页面,想在其中两个页面中响应相同热键,如何实现。
...全文
65 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
lcy_888 2013-04-23
  • 打赏
  • 举报
回复
在同一程序的不同对话框页面用如下语句会有一个注册失败。 RegisterHotKey(this->GetSafeHwnd(),id_hotkey1,MOD_CONTROL,'F');
jimette 2013-04-23
  • 打赏
  • 举报
回复
实现 wm_hotkeyhttp://blog.csdn.net/chshji666666/article/details/5830015
liuli7786 2013-04-23
  • 打赏
  • 举报
回复
在这两个子对话框页面中分别注册热键:RegisterHotKey,并实现OnHotKey函数
用按键机器人开发的屏幕截图 {配置 '编译时不计算结果 NoShowCalc=1 '编译时不运行程序 CompileNoRun=1 '版本号 Ver=1.03 '1.01版解决了截图后多了一个白边的问题 '1.02版截图后自动最大化 '1.03版加上验证码识别功能 '在新的进程运行 RunInNewProcess=1 配置} {说明 屏幕截图(按F9键截屏,拖动鼠标可选择图象) Alt+F9 启动该软件 可通过“快捷键管理”来设置该功能的快捷键 说明} sDestopHwnd:=CallAPIs('user32.dll','GetDC','int','0'); {屏幕HDC} ScreenBottom:=tof( GetObj('','Screen.Height') ) -1; {屏幕下边位置} ScreenRight:= tof( GetObj('','Screen.Width' ) ) -1; {屏幕右边位置} ScreenWidth:= GetObj('','Screen.Width'); {屏幕宽度} ScreenHeight:= GetObj('','Screen.Height'); {屏幕高度} xDown:=-1;{按下x位置,-1表示未按下} yDown:=-1;{按下y位置} xUp:=0;yUp:=0;{鼠标放开的位置} sImageDes:='';{用于保存屏幕图象} sFile:='';{要保存的文件名} sAppTitle:='屏幕截图(按F9键截屏,拖动鼠标可选择图象 如果按住Ctrl键则是验证码识别)'; SetObj('','Title='+g.sAppTitle);{设置应用程序的标题} sForm:=SetObj('','CreateForm');{新建窗口} SetObj(sForm,'WindowState=Maximized');{窗口最大化} SetObj(sForm,'Text='+sAppTitle);{窗口标题} sPaintBox:=SetObj(sForm,'CreatePaintBox');{新建绘图控件} SetObj(sPaintBox,'Left=0 Top=0 Width='+ScreenWidth+' Height='+ScreenHeight );{屏幕宽度和高度} SetObj(sPaintBox,'OnMouseDown=按下鼠标 OnMouseUp=放开鼠标 OnMouseMove=鼠标移动 ');{鼠标事件} SetObj(sPaintBox,'OnPaint=重画');{重画事件} sImage:=SetObj(sForm,'CreateBitmap'); {新建位图,用于绑定屏幕图象} SetObj(sImage,'Width=' + ScreenWidth + ' Height='+ScreenHeight ); sImageDes:=SetObj(sForm,'CreateBitmap');{新建位图,用于保存屏幕图象} SetObj(sImageDes,'Width=' + ScreenWidth + ' Height='+ScreenHeight ); [放开鼠标; bOk:=g.xDown !=-1 and abs(g.xDown-GetVar(1))>4 ; iShift:=GetVar(4); IfCall( 打开保存对话框 , ( (iShift=4 or iShift=5)=0) and bOk );{已经按下时调用“保存图片”} IfCall( 验证码识别 , (iShift=4 or iShift=5) and bOk); {按下 Ctrl键 或 Ctrl+Shift键} g.xDown:=-1;{-1表示未按下} 重画; ]; [保存图片; sImageTemp:=SetObj(g.sForm,'CreateBitmap');{新建临时位图} sTempWidth:=tos( abs(g.xUp-g.xDown) ); {设置宽度} sTempHeight:=tos( abs(g.yUp-g.yDown) ); {设置高度} SetObj(sImageTemp,'Width='+sTempWidth+' Height='+sTempHeight ); {复制图象(从sImageDes复制到sImageTemp)} sRect:=tos(g.xDown)+','+tos(g.yDown)+','+tos(g.xUp)+','+tos(g.yUp);{sImageDes的区域} sRectTemp:='0,0,' + tos(abs(g.xUp-g.xDown)) +','+ tos(abs(g.yUp-g.yDown)) ; {临时位图的区域} SetObj(sImageTemp,'CopyRect='+sRectTemp+','+g.sImageDes+','+sRect ); SetObj(sImageTemp,'SaveToFile='+g.sFile); {保存临时位图到文件} SetObj(sImageTemp,'Free'); {释放临时位图} {SetObj(g.sForm,'Text='+'CopyRect='+sRectTemp+','+g.sImageDes+','+sRect);} ]; [打开保存对话框; sSaveDialog:=SetObj(g.sForm,'CreateSaveDialog');{新建保存对话框} SetPropValue(sSaveDialog,'Filter','(*.bmp)|*.bmp'); {指定扩展名} SetPropValue(sSaveDialog,'DefaultExt','bmp'); {缺省扩展名} SetObj(sSaveDialog,'Execute') ;{执行打开,返回'1'则成功,返回'0'则失败} g.sFile:=GetPropValue(sSaveDialog,'FileName');{得到文件名} IfCall(保存图片,g.sFile!=''); ]; [验证码识别; g.sFile:='temp.bmp'; 保存图片; SetObj('','LoadPicLib=lib');{加载所有识别库,安装目录的lib子目录} IfCall( GetSysValue(500) ,GetVar(4)=5);{键Ctrl+Shift键时,设置“显示识别过程”} s:=SetObj('','GetCodeFromFile='+g.sFile); ShowMessage('验证码识别结果:'+s); SetObj('','FreePicLib');{释放所有识别库} GetSysValue(501);{取消“显示识别过程”} IfCall( RunApp( GetObj('','ExePath')+'out','','') ,GetVar(4)=5); ]; [按下鼠标; g.xDown:=GetVar(1);{按下x位置} g.yDown:=GetVar(2);{按下y位置} ]; [鼠标移动; IfCall(画矩形 , g.xDown!=-1 );{已经按下时 画矩形} ]; [画矩形; g.xUp:=GetVar(1); g.yUp:=GetVar(2); BoundCanvas(g.sPaintBox); {绑定绘图控件} CopyImage(g.sImageDes,0,0,g.ScreenRight,g.ScreenBottom); {从保存的图象中复制过来} SetBrush(255,0,0,1); Rectangle(g.xDown,g.yDown,g.xUp,g.yUp ); Draw; ]; [重画; BoundCanvas(g.sPaintBox); {从sImageDes复制到绘图控件sPaintBox中} CopyImage(g.sImageDes,0,0,g.ScreenRight,g.ScreenBottom); Draw;{画到屏幕} ]; [保存屏幕到图片; BoundCanvas(g.sPaintBox); SetObj(g.sImage,'Handle=' + g.sDestopHwnd); {绑定屏幕图象} {保存屏幕图象(从sImage复制到sImageDes)} SetObj(g.sImageDes,'CopyRect='+GetObj('','Screen.Rect')+','+g.sImage+','+GetObj('','Screen.Rect') ); {从sImageDes复制到绘图控件sPaintBox中} CopyImage(g.sImageDes,0,0,g.ScreenRight,g.ScreenBottom); Draw;{画到屏幕} ]; 保存屏幕到图片; SetObj(sForm,'OnShow=重画'); {**************************实现F9热键*******************************} sAppEvents:=SetObj(sForm,'CreateApplicationEvents');{新建应用程序事件(消息)} { WM_HOTKEY = $0312;}{这是Dephi语言中的鼠标左键按下的常量定义,c语言也有,常量值是一样的} {绑定热键消息(这样能提高性能),因为默认是绑定所有的消息(-1代表所有消息)} SetObj('','BoundMessage=786'); {786是十六进制0312转换后的十进制数} SetObj(sAppEvents,'OnMessage=我的消息'); {指定消息事件调用“我的消息”} [我的消息; 保存屏幕到图片;{ ShowMessage('您好,您按下了F9键!');} ActiveWindow(g.sAppTitle); SetObj(g.sForm,'WindowState=Maximized');{窗口最大化}; ]; {实现:GlobalAddAtom('MyHotKey') - $C000;} sHotKeyAtom:=CallAPIs('kernel32.dll','GlobalAddAtomA','str','MyHotKey');{增加全局原子,主要是为了避免重复注册热键} sHotKey:=StrAndOr(sHotKeyAtom, GetObj('C000','HexToInt') , 4{-} ); {注册一个热键F9,成功返回'1',失败'0',出错返回空串} {这个热键绑定了sForm窗口的句柄Handle} s:=CallAPIs('user32.dll','RegisterHotKey','int,int,int,int', GetObj(sForm,'Handle')+','+sHotKey+',0,120' );{F9键,118代表F7键} IfCall( ShowMessage('注册热键失败') ,s!='1') ; SetObj(sForm,'OnDestroy=释放前'); [释放前; s:=CallAPIs('user32.dll','UnregisterHotKey','int,int', GetObj(g.sForm,'Handle')+','+g.sHotKey ); {取消注册} s:=CallAPIs('kernel32.dll','GlobalDeleteAtom','int', g.sHotKey ); {删除全局原子} ]; {*******************************************************************} SetObj(sForm,'Visible=2');{显示模式窗口} SetObj(sForm,'Free');{释放窗口及子控件}

16,470

社区成员

发帖
与我相关
我的任务
社区描述
VC/MFC相关问题讨论
社区管理员
  • 基础类社区
  • Web++
  • encoderlee
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

        VC/MFC社区版块或许是CSDN最“古老”的版块了,记忆之中,与CSDN的年龄几乎差不多。随着时间的推移,MFC技术渐渐的偏离了开发主流,若干年之后的今天,当我们面对着微软的这个经典之笔,内心充满着敬意,那些曾经的记忆,可以说代表着二十年前曾经的辉煌……
        向经典致敬,或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天,我们期待着MFC技术能够恢复其曾经的辉煌,或许这个期待会永远成为一种“梦想”,或许一切皆有可能……
        我们希望这个版块可以很好的适配Web时代,期待更好的互联网技术能够使得MFC技术框架得以重现活力,……

试试用AI创作助手写篇文章吧