Uygulama : Spider Solitaire
Pointer : &HFF7B5F78
Offset : &H120

Arkadaşlar herşey elimde kodlar da bunlar ama sorun yaşıyorum 0 değeri alıyorum surekli Temel Adress ile veri cektiğimde sıkıntı olmuyor fakat Pointer, Offset ile alamıyorum. Yardımcı olursanız sevinirim...



Private Declare Function ReadMemoryDouble Lib "kernel32" Alias "ReadProcessMemory" (ByVal Handle As Integer, ByVal Address As Integer, ByRef Value As Double, Optional ByVal Size As Integer = 8, Optional ByRef Bytes As Integer = 0) As Double

Public Function ReadDouble(ByVal EXENAME As String, ByVal Address As Integer) As Double
Dim Value As Double
If Process.GetProcessesByName(EXENAME).Length 0 Then
Dim Handle As Integer = Process.GetProcessesByName(EXENAME)(0).Handle
If Handle 0 Then
ReadMemoryByte(Handle, Address, Value)
ElseIf Handle = 0 Then
MsgBox("Hata!")
End If
End If
Return Value
End Function

Public Function ReadPointerDouble(ByVal EXENAME As String, ByVal Pointer As Integer, ByVal ParamArray Offset As Integer()) As Double
Dim Value As Double
If Process.GetProcessesByName(EXENAME).Length 0 Then
Dim Handle As Integer = Process.GetProcessesByName(EXENAME)(0).Handle
If Handle 0 Then
For Each I As Integer In Offset
ReadMemoryInteger(Handle, Pointer, Pointer)
Pointer += I
Next
ReadMemoryDouble(Handle, Pointer, Value)
End If
End If
Return Value
End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Label1.Text = ReadPointerDouble("SpiderSolitaire", &HFF7B5F78, &H120)
End Sub
__________________