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

Вниз

Двоичный формат   Найти похожие ветки 

 
Лана Розанова ©   (2002-02-02 05:08) [0]

Как перевести число в двоичный формат и наоборот?
СПАСИБО!!!


 
Mbo ©   (2002-02-02 06:01) [1]

из RX
function IntToBin(Value: Longint; Digits, Spaces: Integer): string;
begin
Result := "";
if Digits > 32 then Digits := 32;
while Digits > 0 do begin
if (Digits mod Spaces) = 0 then Result := Result + " ";
Dec(Digits);
Result := Result + IntToStr((Value shr Digits) and 1);
end;
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.006 c
1-57118
Petrovich
2002-01-31 23:12
2002.02.18
Календарь-напоминалка


3-57036
vladnt
2002-01-23 10:58
2002.02.18
Почему возникают файлы _qsq.db


1-57045
Санька
2002-02-02 10:52
2002.02.18
Delphi 6 и Delphi 4


14-57199
Knight
2001-12-28 11:58
2002.02.18
Всех с праздниками, вопросик несколько хакерский но просто срочно понадобилось!!!


3-57024
Андре
2002-01-24 09:41
2002.02.18
Отладка хранимых процедур.