Обратная функция

← →
Ivolg © (2007-02-27 15:19) [0]

Привет. Существует обратная функция, функции IntToHex ? Например, при использовании функции:

Caption:=IntToHex(Ord("М"), 2);

В Caption выдается русская буквы "М" в Hex виде - "CC". Мне нужно, чтобы было наобарот. Вводишь букву\символ в Hex виде, а функция преобразовывает в символ, соответствущий введеной букву\символу.

← →
Ega23 © (2007-02-27 15:26) [1]

Caption := Chr(StrToInt("$"+Edit1.Text))

← →
Юрий Зотов © (2007-02-27 15:27) [2]

function HexToChar(HexCode: string): char;
begin
Result := Char(StrToInt("$" + HexCode))
end;

Спасибо Вам большое. Теперь я понял в чем была проблема с функцией Chr.

Обратная функция Найти похожие ветки