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

Вниз

Как использовать функцию BinToHex, HexToBin   Найти похожие ветки 

 
Raper   (2003-09-02 11:28) [0]

Покажите наглядным примером как точно использовать функцию BinToHex, HexToBin если к примеру бинарное число равно 1000001 а то есть буква A


 
Skier ©   (2003-09-02 11:31) [1]

Штука в том что все числа в компьютере - бинарные, ты лишь
работаешь со строковым представлением числа, отсюда и танцуй.


 
Palladin ©   (2003-09-02 11:42) [2]

Перед использованием тебе необходимо выделить некоторое количество памяти для хранения результата, это и будет Text.

var
BinValue:integer;
HexValue:PChar;

BinValue:=$FF;
HexValue:=StrAlloc(SizeOf(BinValue)*2+1); // *2 - Это мы вычитали в справке, надею ты туда заглянешь
BinToHex(@BinValue,HexValue,SizeOf(BinValue));
Application.MessageBox(hexValue,"BinToHex")


Или как вариант вместо использования PChar

var
BinValue:integer;
HexValue:String;

BinValue:=$FF;
SetLength(HexValue,SizeOf(BinValue)*2);
BinToHex(@BinValue,PChar(HexValue),SizeOf(BinValue));
Application.MessageBox(PChar(hexValue),"BinToHex")



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

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

Наверх




Память: 0.47 MB
Время: 0.023 c
14-48755
Neox
2003-08-26 12:28
2003.09.15
Любителям 1С


14-48707
Shuric
2003-08-28 22:16
2003.09.15
ClearType технология


1-48580
ossa
2003-09-04 07:57
2003.09.15
Подскажите как добавить путь к новым компонентом в


6-48663
Nikma
2003-06-30 03:33
2003.09.15
Как получить данные с web сайта


1-48603
AlexPul
2003-09-03 13:02
2003.09.15
Кодировка в консольных приложениях