Показать сообщение отдельно
Старый 11.11.2010, 22:59   #7
Новичок
 
Аватар для LAV45
 
Регистрация: 13.05.2010
Адрес: Минск
Сообщений: 13
Сказал Спасибо: 6
Имеет 0 спасибок в 0 сообщенях
LAV45 пока неопределено
По умолчанию

Всем биг спс ))

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;

Последний раз редактировалось LAV45, 11.11.2010 в 23:18.
LAV45 вне форума   Ответить с цитированием