VB 在屏幕中间写个“十”字 要求不闪
来源:百度知道 编辑:UC知道 时间:2024/05/31 08:45:35
也许大家没听懂我的要求,我在从新说下要求吧:
1.要求在游戏里不能闪(好像听说用哪个什么双缓存技术就可以,当然你有其他办法也可以)
2.如果鼠标点到了那个“十”字,不切换出游戏
二楼的说对了 我是用在CS里 ,4楼的那个代码对 但是闪啊 游戏里闪的厉害 我把毫秒调成了1也闪的
Option Explicit
Private Declare Function GetWindowDC Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal hdc As Long) As Long
Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, lpPoint As POINTAPI) As Long
Private Declare Function LineTo Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long
Private Declare Function CreatePen Lib "gdi32" (ByVal nPenStyle As Long, ByVal nWidth As Long, ByVal crColor As Long) As Long
Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, ByVal hObject As Long) As Long
Private ps As Long
Private pw As Long
Private pc As Long
Private Const PS_NULL = 5
Private Const PS_INSIDEFRAME = 6
Private Const PS_DASH = 1 ' -------