赞 | 12 |
VIP | 107 |
好人卡 | 6 |
积分 | 4 |
经验 | 31122 |
最后登录 | 2024-6-29 |
在线时间 | 1606 小时 |
Lv2.观梦者 傻♂逼
- 梦石
- 0
- 星屑
- 374
- 在线时间
- 1606 小时
- 注册时间
- 2007-3-13
- 帖子
- 6562
|
8楼
楼主 |
发表于 2008-2-21 02:04:58
|
只看该作者
以下引用越前リョーマ于2008-2-20 16:55:29的发言:
<br><script language="javascript">
<!--
strCont="是VB的……?\r\n那不是VX用的……\r\n发VX区干嘛……";
document.write(ubb.spbShowTopic(strCont,1));
//-->
</script>是VB的……?<br>
那不是VX用的……<br>
发VX区干嘛……
给VX调用的
#DLL位置
DLL = 'mouse'
# 定义变量
$GetActiveWindow = Win32API.new("user32", "GetActiveWindow", nil, 'l')
$hWnd = $GetActiveWindow.call
$Get_Pos_X = Win32API.new(DLL, 'Get_Pos_X', nil, 'l')
$Get_Pos_Y = Win32API.new(DLL, 'Get_Pos_Y', nil, 'l')
$Left = Win32API.new(DLL, 'Get_Left', nil, 'l')
$Right = Win32API.new(DLL, 'Get_Right', nil, 'l')
$Updata = Win32API.new(DLL, 'Updata_Mouse', nil, 'l')
$Mouse_Close = Win32API.new(DLL, 'Mouse_Close', nil, nil)
$Mouse_Start = Win32API.new(DLL, 'Mouse_Start', 'l', 'l')
但是会出错 |
|