| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Обратная функция
Ivolg © (2007-02-27 15:19:00)Привет. Существует обратная функция, функции IntToHex ? Например, при использовании функции:
Caption:=IntToHex(Ord('М'), 2);
В Caption выдается русская буквы "М" в Hex виде - "CC". Мне нужно, чтобы было наобарот. Вводишь букву\символ в Hex виде, а функция преобразовывает в символ, соответствущий введеной букву\символу.
Ivolg (2007-02-27 15:46:00) [1]Спасибо Вам большое. Теперь я понял в чем была проблема с функцией Chr.
Юрий Зотов (2007-02-27 15:27:00) [2]function HexToChar(HexCode: string): char;
begin
Result := Char(StrToInt('$' + HexCode))
end;
Ega23 (2007-02-27 15:26:00) [3]
Caption := Chr(StrToInt('$'+Edit1.Text))
| |
