终于又到了广东了.
作者:admin 日期:2008-10-08
全局热键类的多热键示例工程(VB6.0代码)
作者:admin 日期:2008-10-01
这个类很早就发布了,当时写了个很简单的单热键示例.
有朋友说最好弄个多热键的示例,于是就整了这个东东出来.
代码可能有些乱,我来说说基本的使用思路:
一,设置一个本进程句柄(frmHwnd属性)
二,增加热键(AddHotKey方法)
这个方法返回的是一个标志本组热键组合的索引,在热
键事件到来时可以简化判断.
三,启动捕捉热键循环(StartHotKeys方法)
没有使用子类化,所以用一个死循环来做一个消息泵,不
断地从消息队列里检查是否有热键消息到来.由于是死
循环,所以需要传入一个定时器用于立即返回此方法,使
调用流程能够继续下去.
四,删除热键(DelHotKey方法)
这个方法的作用是删除单个热键.相应的热键组合可以使
用GetHotKeySetting结合HotKeysCount属性来取得.
五,查询热键组合的数量(HotKeysCount属性)
定义了几组就是几,之前没有考虑到这个.
六,查询热键组合的值(GetHotKeySetting方法)
这个方法可以返回指定的组合内具体的各键状态.
七,热键按下后的事件(HotKeyPress事件)
当完成了第1,2,3步后,就可以开始捕捉热键了,这时只要
按下热键,将会触发HotKeyPress事件,事件的参数里既有
热键组合的索引,也有该组组合内各键具体的值,以方便
不同情况下的判断.
其实我觉得具体的键值好象是多余的......反正可以根
据GetHotKeySetting方法取得呀...大家自己取舍吧,反
正放它们在那里应该也不碍什么事,能省一步省一步吧-_-b
八,其它的就自己看吧.....其实这个东西又没多复杂....
原来的那个示例在这里:
../blog2/blogview.asp?logID=202&cateID=2
那里面的类有些错误,已经修正,现在的地址在这里:
点击下载此文件
希望我的这些模块能真的方便到大家.
有朋友说最好弄个多热键的示例,于是就整了这个东东出来.
代码可能有些乱,我来说说基本的使用思路:
一,设置一个本进程句柄(frmHwnd属性)
二,增加热键(AddHotKey方法)
这个方法返回的是一个标志本组热键组合的索引,在热
键事件到来时可以简化判断.
三,启动捕捉热键循环(StartHotKeys方法)
没有使用子类化,所以用一个死循环来做一个消息泵,不
断地从消息队列里检查是否有热键消息到来.由于是死
循环,所以需要传入一个定时器用于立即返回此方法,使
调用流程能够继续下去.
四,删除热键(DelHotKey方法)
这个方法的作用是删除单个热键.相应的热键组合可以使
用GetHotKeySetting结合HotKeysCount属性来取得.
五,查询热键组合的数量(HotKeysCount属性)
定义了几组就是几,之前没有考虑到这个.
六,查询热键组合的值(GetHotKeySetting方法)
这个方法可以返回指定的组合内具体的各键状态.
七,热键按下后的事件(HotKeyPress事件)
当完成了第1,2,3步后,就可以开始捕捉热键了,这时只要
按下热键,将会触发HotKeyPress事件,事件的参数里既有
热键组合的索引,也有该组组合内各键具体的值,以方便
不同情况下的判断.
其实我觉得具体的键值好象是多余的......反正可以根
据GetHotKeySetting方法取得呀...大家自己取舍吧,反
正放它们在那里应该也不碍什么事,能省一步省一步吧-_-b
八,其它的就自己看吧.....其实这个东西又没多复杂....
原来的那个示例在这里:
../blog2/blogview.asp?logID=202&cateID=2
那里面的类有些错误,已经修正,现在的地址在这里:
点击下载此文件希望我的这些模块能真的方便到大家.
使用RtlComputeCrc32取文件与字符串CRC32值(VB6代码)
作者:admin 日期:2008-09-29
系统有一个RtlComputeCrc32函数是专门用于取字符串CRC32值的,我将其与内存映射文件相关函数结合,做成了一个能取文件CRC32值的模块.
例子工程包含的两个功能模块,一个是取CRC32值的,另一个是内存映射文件相关操作的封装,前者如果需要计算文件的CRC32值,则需要与后者结合.
对于取文件映射指针的操作,我这里发现只要大于一定值(我这里最大的正常文件是420M的单文件),MapViewOfFile就会失败,报的原因是"存储空间不足,无法完成此操作",但是我内存是2G,虚拟内存也有3G,怎么会报这个错误呢?不解.并且前面的CreateFileMapping却从来没有出过错,真怪了.还请用过MapViewOfFile这个函数的朋友指点一下,完善此代码,在下感激不尽~~~
例子工程包含的两个功能模块,一个是取CRC32值的,另一个是内存映射文件相关操作的封装,前者如果需要计算文件的CRC32值,则需要与后者结合.
对于取文件映射指针的操作,我这里发现只要大于一定值(我这里最大的正常文件是420M的单文件),MapViewOfFile就会失败,报的原因是"存储空间不足,无法完成此操作",但是我内存是2G,虚拟内存也有3G,怎么会报这个错误呢?不解.并且前面的CreateFileMapping却从来没有出过错,真怪了.还请用过MapViewOfFile这个函数的朋友指点一下,完善此代码,在下感激不尽~~~
程序代码
