| Вопрос: PtInRect | Добавлено: 13.10.06 16:47 |
Автор вопроса:  Fever
|
|
Private Sub tmrUnFire_Timer()
Static flg As Boolean Dim rc As RECT, cur As POINTAPI, a As Boolean GetCursorPos cur GetWindowRect hwnd, rc 'a = PtInRect(rc, cur) Нафиг не работает, используем VB a = Not (rc.Left <= cur.X And cur.X <= rc.Right And rc.Top <= cur.Y And cur.Y <= rc.Bottom) If a Then If Not flg Then Draw Debug.Print "draw" flg = True End If Else flg = False End If End Sub |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 14.10.06 00:13 |
|
ну потому что руки крюки в PtInRect аргументы передать...
http://mech.math.msu.su/~vfnik/WinApi/p/ptinrect.html |
||
|
Номер ответа: 2 Автор ответа: Fever Вопросов: 60 Ответов: 808 |
Профиль | | #2 | Добавлено: 17.10.06 16:39 |
Сам такой  А за ссылку спасибо
|
||
|
Номер ответа: 3 Автор ответа: FeverВопросов: 60 Ответов: 808 |
Профиль | | #3 | Добавлено: 17.10.06 16:49 |
|
Private Declare Function PtInRect Lib "user32" (lpRect As RECT, pt As POINTAPI) As Long
из API Viewer'а Private Declare Function PtInRect Lib "user32" (lpRect As RECT, ByVal x As Long, ByVal y As Long) As Long
работает Вывод: не верьте API Viewer'у!!! |
||
|
Номер ответа: 4 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #4 | Добавлено: 18.10.06 23:50 |
Какие руки, такой и API Viewer  )) У меня в API Viewer'е PtInRect, именно с двумя аргументами, и второй именно pt As POINTAPI !
|
||
Страница: 1 |