hwn&pid顯示
以楓之谷為例:表單:TextX2 TimerX1
Private Sub Timer1_Timer()
If FindGame("MapleStory") = True Then
hwn顯示.Text = hwn
pid顯示.Text = pid
End If
End Sub
模組:
Public Declare Function FindWindow
Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal
lpWindowName As String) As Long
Public Declare Function OpenProcess Lib "kernel32" (ByVal
dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId
As Long) As Long
Public Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Integer
Public Declare Function WriteProcessMemory Lib "kernel32" (ByVal
hProcess As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As
Long, lpNumberOfBytesWritten As Long) As Long
Public Declare Function ReadProcessMemory Lib "kernel32" (ByVal hProcess
As Long, lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long,
lpNumberOfBytesWritten As Long) As Long
Public hwn As Long 'Handle Of Window 視窗鉤子
Public Phandle As Long 'Handle Of Process 程序鉤子
Public pid As Long 'Process ID 程序ID
Public Function FindGame(strGame As String) As Boolean
hwn = FindWindow(vbNullString, strGame) '尋找遊戲視窗
GetWindowThreadProcessId hwn, pid '取得程序ID
Phandle = OpenProcess(&H1F0FFF, False, pid) '取得遊戲進程
If hwn <> 0 Then FindGame = True '判斷並傳回是否取得進程
End Function
最近在研究這個怎麼寫
謝謝冰楓高手 模組要什麼@@???
這是顯示什麼用的阿? 1# 冰楓
目前缺的是血魔Pointer ^_^ 5# broken0808
人物HP警告 00cc2254 44
人物MP警告 00cc2254 48
人物HP值 00cc2560 1814
人物MP值 00cc2560 1818 謝謝大大分享~ 謝謝大大分享~ 好像是哪個模組裡面的@@"
我看過~顆顆.. 無聊來這晃晃 順便學習 ~ 6# 冰楓
TKS . 鎖定的顯示?
hwn/pid
謝分享~ 好像在哪裡看到? 忘了zz 是顯示POINT嗎?? 什麼是hwn&pid - -?