WriteProcessMemory и другие фишки с памятью

[artemds]

Люди добрые уже два дня не ел не могу разобраться как работает
WriteProcessMemory
Вот здесь по парил ни...рена не работает

opnProc = OpenProcess(PROCESS_VM_OPERATION Or PROCESS_VM_WRITE, True, Proc.Id)

toWrite = 501

ReadResult = WriteProcessMemory(opnProc, &H13A75C, toWrite, Len(toWrite), Readed)

Где Proc.Id - PID нужного мне процесса

Ничего не получается!!!

Спасибо Родина Вас не забудет....