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

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

Преобразование числа [D6, WinXP]


RyDmi ©   (2004-04-23 22:54:00) 

Мне нужно записать десятичное число в двоичном виде и поместить в строку, т.е. мне нужно в TLabel поместить двоичный вид числа.


RyDmi   (2004-04-24 16:33:00) [1]

DVM, большое спасибо за ответ.


Vit@ly   (2004-04-24 11:30:00) [2]

Проверил DVM ©   (24.04.04 00:31) [2]
Вполне отвечает посту. Странноно почему молчит RyDmi(23.04.04 22:54) мог бы выразить благодарность и закрыть пост.


Anatoly Podgoretsky   (2004-04-24 11:17:00) [3]

Какие уроки информатики, курсовую надо сдавать


DVM   (2004-04-24 00:31:00) [4]

function IntToBin(Value: LongInt;Size: Integer): String;
var

i: Integer;
begin

Result:='';
for i:=Size downto 0 do begin
if Value and (1 shl i)<>0 then begin
Result:=Result+'1';
end else begin
Result:=Result+'0';
end;
end;
end;


DrPass   (2004-04-23 23:31:00) [5]

См. первый (или второй) урок информатики школьного курса


Наверх

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