Всем биг спс ))
ss то у нас #$63#0 #$6F#0 #$6E#0 #$73#0
если использывать Tmp: array[0..3] of char absolute result;
#0 остаются и на выходе получаем $63006F00
Вот так лучше будет
Код:
Function GetInt(const ss:string):integer;
var tmp: array[0..3] of byte absolute result;
begin
tmp[3] := ord(ss[1]);
tmp[2] := ord(ss[2]);
tmp[1] := ord(ss[3]);
tmp[0] := ord(ss[4]);
end;