Форум: "Начинающим";
Текущий архив: 2006.08.06;
Скачать: [xml.tar.bz2];
ВнизBinary Найти похожие ветки
← →
yon © (2006-07-14 19:49) [0]Всем привет!
Подскажите функцию преобразования: integer -> binary
Fanks.
← →
Leonid Troyanovsky © (2006-07-14 20:01) [1]
> yon © (14.07.06 19:49)
> Подскажите функцию преобразования: integer -> binary
Приведи пример подобного преобразования.
--
Regards, LVT.
← →
yon © (2006-07-14 20:03) [2]Имею к примеру циферу "45" и есть необходимость предсатвить её в бинарном виде "101101", ну только конечно же програмно.
← →
Alien1769 © (2006-07-14 20:06) [3]это обычный HEX-код. Чего требуем!
← →
Alien1769 © (2006-07-14 20:08) [4]А еще
смотри
http://delphimaster.net/view/2-1152877503/
← →
yon © (2006-07-14 20:09) [5]"45" - dec
"2D" - hex
101101 - bin - искомая
← →
Alien1769 © (2006-07-14 20:10) [6]Так тебе надобно HEXtoBIN ?
← →
yon © (2006-07-14 20:13) [7]yes
← →
Alien1769 © (2006-07-14 20:14) [8]Дык это просто:
function HexToBin(Text, Buffer: PChar; BufSize: Integer): Integer
Description
Call HexToBin to convert the hexadecimal string Text to the binary value it represents.
Text is a string representation of a hexadecimal value.
Buffer returns the resulting value in binary.
BufSize is the size of Buffer. Text needs to point to at least 2*BufSize hexadecimal characters, because each two hexadecimal characters represent one byte.
HexToBin returns the number of characters in Buffer that have not been used because Text did not contain valid hexadecimal characters ("0".."f").
Note: The hexadecimal number must use lower-case characters; HexToBind does not recognize upper-case characters.
← →
yon © (2006-07-14 20:17) [9]Спасибо, видно справку делфей надо заменить.
← →
Alien1769 © (2006-07-14 20:19) [10]
> Спасибо, видно справку делфей надо заменить.
Плиз версион
← →
begin...end © (2006-07-14 20:25) [11]Насколько я понял, нужно из числа 45 получить строку, содержащую двоичное его представление. Для этого можно воспользоваться функцией IntToBin (см. модуль idGlobal). А HexToBin тут вряд ли поможет.
← →
Alien1769 © (2006-07-14 20:28) [12]to begin...end ©
Сорри, местные юзеры достали.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.08.06;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.011 c