08/03/05 09:39:40
１、WindowHandleは適切な名前ではない。 hProces 等にする事
２、Writeも適切な名前でない。WriteSize とか cbWriteとか
３、Sizeof(buf)はポインタサイズで現在は４を返してる筈。
よって、
var
buf: string;
hProces : THandle;
WriteSize:DWORD;
WindowHandle := OpenProcess(PROCESS_ALL_ACCESS, False, ProcessId);
SetLength(buf,1);
buf[1] := Chr($3D);
WriteProcessMemory(WindowHandle, ptr(Address), PChar(buf), length(buf), Write);
ただし、35901が表示されたという事は、ホントは書きたい値は１バイトではなく２バイトか４バイト
の可能性が大。