» Delphi: Как сложить hex-числа?

Возникла необходимость подсчитать чексумму некоторой строки. Алгоритм таков.
Есть к примеру строка вида:
7Ff
Нужно подсчитать чексумму в виде:
hex(7)+hex(F)+hex(f) = ??
Руками все делается просто - смотрим табличку перевода символов ASCII в hex и на виндовском калькуляторе спокойно все считается:
37h+46h+66h=E3h
Как это же проделать на Делфи?
Какой должен быть тип переменной - чексуммы и как его перевести в string?

Заранее спасибо

а в дельфи почему не получается?
i := $1f + $2f

Может я туплю, но что-то после праздников не доходит
Просто сложить известные числа - получается... чем перевести?
Скажем переменные типа char
a:='7'
b:='F'
c:='f'
Надо получить их hex-значения и их сложить.
Как?

F1 + IntToHex.

sunduk4
Слушай, умничать мы все умеем, ты покажи как это работает?
Я же наверно не просто так спрашиваю, а потому что с утра уже голову об эти преконвертировки типов сломал...

var a, b, c, d: integer;
a := $7;
b := $F;
c := $F;
d := a + b + c;
ShowMessage('Result: ' + IntToHex(d, 2));

a, b, c - коды символов в int/hex

Кажется доколебал...

Код: function TForm1.TransRequest(cnumTr,cmdTr,paramTr:string):string;
var CheckSum: string;
a,b,c,d:integer;

begin
a:=Ord(cnumTr[1]);
b:=Ord(cnumTr[2]);
c:=Ord(cmdTr[1]);
d:=a+b+c;
CheckSum:=IntToHex(d,2);
label1.caption:='*'+cnumTr+cmdTr+paramTr+checksum+'#';
Result:='*'+cnumTr+cmdTr+paramTr+checksum+'#';
end;

пробегогаешь по символам строки, получаешь коды символов, они - integer, складываешь.
преобразуешь в hex.
все собственно.

а не проще что-то типа
StrToInt('$' + a) + StrToInt('$' + b) + StrToInt('$' + C)

imonah
Числа не бывают hex или не hex. Hex — это строковое представление числа, строки складывать не рекомендуется.
Тебе, как я понял, нужно hex-представление суммы всех кодов символов в строке.
В первом приближении это выглядит так:

Код:
var
s: string; // исходная строка
sum: integer; // сумма
r: string; // результат
begin
for i := 1 to length(s) do
inc(sum, ord(s[i]));
r := IntToHex(sum)

evle
Ну да, приблизительно так и сделано... Проблема была в преобразовании... Когда до меня доперло, что

Цитата:

Числа не бывают hex или не hex. Hex — это строковое представление числа, строки складывать не рекомендуется.

То дальше все решилось.
Спасибо всем, кто поучаствовал