求助一个神奇的问题,有关SkinH_VB6.dll跟鼠标滚轮API未知的问题,高分求助!
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了求助一个神奇的问题,有关SkinH_VB6.dll跟鼠标滚轮API未知的问题,高分求助!相关的知识,希望对你有一定的参考价值。
设计了一个程序,先是为了美化界面用到了SkinH_VB6.dll,后面由于为了方便操作给VScroll添加了支持鼠标滚轮操作的代码,在XP下正常运行没有冲突,但是在win7下面鼠标滚轮的代码就失效了,是否有解决办法?
主程序代码:
Private Sub Form_Load()
SkinH_Attach
SkinH_AttachEx App.Path & "/Pfur/aero.she", ""
'如果把这2句皮肤代码代码去掉滚轮就能正常使用了
End Sub
Private Sub Picture1_GotFocus(index As Integer) '获取焦点时候
If index = 0 Then
Set VScrol = Me.VScroll2
End If
If index = 1 Then
Set VScrol = Me.VScroll1
End If
hwndVS = Picture1(index).hWnd
OldWindowProc = GetWindowLong(Picture1(index).hWnd, GWL_WNDPROC)
Call SetWindowLong(Picture1(index).hWnd, GWL_WNDPROC, AddressOf NewWindowProc)
End Sub
Private Sub Picture1_LostFocus(index As Integer)
SetWindowLong Picture1(index).hWnd, GWL_WNDPROC, Oldwinproc
End Sub
我把问题代码重新打包了一个工程
http://yun.baidu.com/pcloud/album/file?album_id=4665659187635383070&uk=2030078696&fsid=212675178875565
望大神解决
win7 xp 均没问题,附件
测试可用 求源码
参考技术B 我用中文专业版没问题,如果需要专业版的话联系我求助,安卓webview打开一个页面的时候页面闪动
参考技术A 这应该与CSS设置有关吧!如果你的表格的边框或单元格都是为0的话,运行出来自然没有看到效果的!以上是关于求助一个神奇的问题,有关SkinH_VB6.dll跟鼠标滚轮API未知的问题,高分求助!的主要内容,如果未能解决你的问题,请参考以下文章