f0xi s'il te plais, pourrais tu encore me donner un petit coup de pouce ?
en fait j'ai ça en C/C++ :
DWORD OldProtect = 0; DWORD damageBlockAddress = 0; VirtualProtectEx(HRBRWindow,(LPVOID)0x008EF660,4,PAGE_READWRITE,&OldProtect); ReadProcessMemory(HRBRWindow,(LPCVOID)0x008EF660, &damageBlockAddress, 4, NULL); damageBlockAddress += 0x620; VirtualProtectEx(HRBRWindow,(LPVOID)damageBlockAddress,4,PAGE_READWRITE,&OldProtect); ReadProcessMemory(HRBRWindow,(LPCVOID)damageBlockAddress, &damageBlockAddress, 4, NULL); ..... DWORD value = 0; DWORD bytesWritten = 0; DWORD leftDoorOffset = damageBlockAddress + 0x36C; VirtualProtectEx(hProcess,(LPVOID)leftDoorOffset,4,PAGE_READWRITE,&OldProtect); WriteProcessMemory(hProcess, (LPVOID)leftDoorOffset, &value, 4, &bytesWritten);
et j'aurais besoin de le traduire en delphi.... Avec les renseignements que tu m'as fourni, jusqu'au premier VirtualProtectEx j'arrive à compiler mais au niveau du ReadProcessMemory j'ai une erreur me disant que les paramètres var originaux et formels doivent être identiques !! J'ai ça comme déclarations : - HRBRWindow : THandle; - dwProcessId, OldProtect, damageBlockAddress: dword; et j'ai tenté de comiler ça :
OldProtect := 0; damageBlockAddress := 0; MA := $008EF660; VirtualProtectEx(HRBRWindow, Ptr(MA),4,PAGE_READWRITE,OldProtect); ReadProcessMemory(HRBRWindow, Ptr(MA), Ptr(damageBlockAddress), 4, nil); ...
merci en tout cas pour ta première réponse.
Philippe DROUET
|