String To HEx

Vopros098 28.06.2004 - 13:29 | delphi: Как перевести Символ в HEX;
AtheR 1 - 28.06.2004 - 13:34 | Если память не изменяет моему старческому мозгу, то таких стандартных функций в Делфях нет, то бишь тебе надо: 1. Взять код символа 2. Делением на 16 довести его до 16-ричного вида 3. Записать результат в строку Если, конечно, тебе именно етого нада... :)
SBoyko 2 - 28.06.2004 - 14:36 | Наверное единственны
SBoyko 3 - 28.06.2004 - 14:38 | й случай, когда можно шутя сказать "Напиши массив из 255 элементов 00 01 02 ... BF ... FF
KAPACb 4 - 28.06.2004 - 16:24 | кажысь, есть такая функция в делфи
SBoyko 5 - 28.06.2004 - 16:36 | const a: array[0..15] of Char = ('0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F'); function StrToHex(C: Char): string; var i: Byte; begin i := ord(C); Result := a[(i div 16)] + a[(i mod 16)]; end;
Vopros098 6 - 28.06.2004 - 17:55 | СЭнкс!
GrEG 7 - 29.06.2004 - 13:31 | IntToHex(ord(ch),2)?

>>