HEX и DEC

[yuta_86]

добрый день.

есть число (например 357) в десятичной системе.
перевожу его в HEX получается 0165
вопрос : как теперь разбить это число на два числа 01 и 65 и записать их в разные переменные.
для разбиения использовал

x:=$0165;
t1,t2:string;
t1:= hi(inttohex(x,2));
t2:= lo(inttohex(x,2)) ; как быть дальше?

[SERG1980]

Ну вы их и записали в переменные а что дальше то надо?

[yuta_86]

я записал в строковые переменные. а надо в byte.

[Пепел Феникса]

начальное число разбивайте на две части, а не строку.

var w:word=$0165;
b1,b2:byte;
b1:=lo(w);
b2:=hi(w);

[yuta_86]

первоначально HEX число записано в SpinEdit.

[veniside]

тогда уже сразу для 32-битного числа приведу код, а то будет новая тема )

b0 := (x shr 00) and $FF;
b1 := (x shr 08) and $FF;
b2 := (x shr 16) and $FF;
b3 := (x shr 24);

[yuta_86]

Сообщение от veniside

тогда уже сразу для 32-битного числа приведу код, а то будет новая тема )

b0 := (x shr 00) and $FF;
b1 := (x shr 08) and $FF;
b2 := (x shr 16) and $FF;
b3 := (x shr 24);

что это такое?

[Пепел Феникса]

первоначально HEX число записано в SpinEdit.

и что с того?
ктото мешает взять значение оттуда?

что это такое?

ну вообще то Integer состоит из 4-х байт.