Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

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

 
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;


 
Ivolg ©   (2007-02-27 15:46) [3]

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



Страницы: 1 вся ветка

Текущий архив: 2007.03.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.06 c
15-1172142753
ПЛОВ
2007-02-22 14:12
2007.03.18
Постоянно повышайте свою квалификацию, а не то...


2-1172267824
arccis
2007-02-24 00:57
2007.03.18
закрытие и автозагрузка


15-1172163533
default
2007-02-22 19:58
2007.03.18
Подключение по локальной сети в винде


15-1171677913
Tirael
2007-02-17 05:05
2007.03.18
AC3


2-1172603027
sat
2007-02-27 22:03
2007.03.18
TMemoryStream