Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перевод шестнадцатеричного числа в двоичное [D5, Win95/98]


Алексей ©   (2004-06-10 09:23:00) 

Подскажите, пожалуйста, как перевести шестнадцатеричное число в двоичное (FF = 11111111) и наоборот? Может существуют специальные компоненты?


OSokin   (2004-06-13 18:52:00) [1]

Я знаю только из десятичного в двоичный. Если надо - скажи, дам. Хотя имхо это всем известно.


Maxud   (2004-06-10 15:06:00) [2]

http://dynamic.nm.ru/Articles/ssconvert.htm


BillyJeans   (2004-06-10 14:59:00) [3]

IntToBin($FFFF)


AleXqwq   (2004-06-10 11:59:00) [4]

Za 200$ kto ne gatov?


GuAV   (2004-06-10 11:13:00) [5]

SergP ©   (10.06.04 11:09) [4]
Массивом а не кейсом лучше бы сделал. таблицы - рулят.


SergP   (2004-06-10 11:09:00) [6]


>  Алексей   (10.06.04 09:23)


А что ты подразумеваешь под числом в шестнадцатиричной или двоичной системе?

Если имеется ввиду строка (string) c соотв. символами, то:

function hextobin(hex:string):string;
var
 i:integer;
begin
 result:='';
 for i:=1 to length(hex) do
 case hex[i] of
   '0': result:=result+'0000';
   '1': result:=result+'0001';
   '2': result:=result+'0010';
   // и так далее до 'F', мне просто лень это писать...
 end;
end;

А наоборот аналогично. Только начинаешь с правого конца строки и берешь каждый раз по 4 символа. Только сначала дополни строку нулями спереди до ближайшей кратной 4 длины...


Внук   (2004-06-10 10:24:00) [7]

За $200 готов написать такой компонент. Если еще $100 добавить, могу встроить фичу перевода в восьмеричную.


Digitman   (2004-06-10 09:34:00) [8]


> Может существуют специальные компоненты?


а как же !

TDummyHead на вкладке Lazy


Романов Р.В.   (2004-06-10 09:31:00) [9]

calc.exe


Наверх

Титульная страница Поиск, карта сайта Написать письмо