Using WriteProcessMemory and ReadProcessMemory

[valdemos]

I tried this:

procedure TForm1.Button1Click(Sender: TObject);
var
  v: pchar;
  r: dword;
begin
  Getmem(v,2);
  ReadProcessMemory(ph,pointer(Edit1.Text),v,2,r);
  Edit2.Text:= String(v);
  Freemem(v);
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  buff: PChar;
begin
  buff:= pchar(Edit1.Text);
  WriteProcessMemory(ph,pointer(Edit1.Text),buff,SizeOf(buff),bytes);
end;

If someone could help me I'll be grateful.

[DirkS]

If someone could help me I'll be grateful.

With what?

What do you expect and what do you get?

Gr
Dirk.