读书人

datawindow中的文本列不响应鼠标中键

发布时间: 2012-02-15 12:09:44 作者: rapoo

datawindow中的文本列不响应鼠标中键,如何使其响应?
如题


[解决办法]
以下代码在winxp+pb9下测试通过~~

//函数声明
Subroutine keybd_event(int bVk , int bScan,int dwFlags, long dwExtraInfo) LIBRARY "user32" Alias FOR "keybd_event"
//在数据窗口的other事件中写入下面的代码

Constant ulong VK_UP = 38 //&H26
Constant ulong VK_DOWN = 40 //&H28

int li_key
if message.number = 522 then
if IntHigh(message.wordparm)=120 then
li_key = VK_UP
else
li_key = VK_DOWN
end if
keybd_event(li_key , 0,0, 0)
keybd_event(li_key , 0,2, 0)
end if

读书人网 >PB

热点推荐