Cheatengine里的四 bytes转换为text应该怎样写

Cheatengine里的4 bytes转换为text应该怎样写?


有人说string()就可以了
但是我转换出来的是乱码
搜寻了十多个帖子也无找到解决方法
麻烦大家帮帮忙 谢谢

[解决办法]
byte  int ascii  char string
转换就是了
[解决办法]
是不是这个？

procedure TForm1.Button2Click(Sender: TObject);
var
        mm: integer;
        ss: string;
begin
        mm := StrToInt(Edit1.Text);
        //mm := '909652023';
        ss := '';
        while mm div 256 >0 do
        begin
                ss := chr(mm mod 256) + ss;
                mm := mm div 256;
        end;
        ss := chr(mm) + ss;
        showmessage(ss);
end;