Кодировка

[svob]

Здравствуйте, у меня такая проблема :
Я хочу прочитать память процесса и вывести её в edit4. Но выводит символы/цифры/буквы непонятной кодировки. Заметил только одно, то, что если эта ячейка равна например "13" то символ, который будет в edit4 будет alt + 13 (на нумлоке) Как сделать чтобы выводило нормальные цифры


Код:

procedure TForm1.Timer1Timer(Sender: TObject);
var
  a : integer;
  hProc, PID : DWORD;
  hWnd : THandle;
  numberRead : THandle;
  IpBuf :  PWideChar; 
  len : integer;
  ipBase: ^dword; 
  Buf : PChar;
  Write:cardinal;
begin
  hWnd:=findwindow(nil,'Game');
  Edit1.Text:=inttostr(hWnd); 
  GetWindowThreadProcessId(hWnd, @PID); 
  Edit2.Text:=inttostr(PID); 
  hProc:=OpenProcess(PROCESS_ALL_ACCESS, False, PID); 
  if hProc <> 0 then 
  try
    len   := 200;
    ipBuf := AllocMem(len);
    Edit3.Text:=inttostr(hProc); 
    //ipBase:=ptr($0008EBAA);
    ipBase:=ptr($131F4747);
    //ReadProcessMemory(hProc, ipBase, ipBuf, len, numberRead); /
    ReadProcessMemory(hProc, ipBase, ipBuf, len, numberRead);
    Edit4.Text:=FormatFloat ('0', a);
    Edit4.Text:=string(ipbuf); 
    Edit4.MaxLength := 10;
    label1.Caption:=string(ipbuf); 
  finally
    CloseHandle(hProc);
    FreeMem(ipBuf);
  end;
end;

Буду очень благодарен за помощь

[Stilet]

Символы и буквы будет выводить правльно.
Для чисел используй IntToStr()
Только в этом случае нужно либо типы приводить к целому, либо что лучше читать именно в переменку типа integer

[svob]

Можно кодом? Мне так проще будет усвоить

[Stilet]

var intt:integer;
...
    ReadProcessMemory(hProc, ipBase, intt, sizeof(intt), numberRead);
    Edit4.Text:=inttostr(intt);

[svob]

Вот

[Stilet]

Тебе стоит научиться различать параметры передаваемые в процедуру:
@intt