Почитайте!

Нас читают

Статьи о программировании и не только

Mail.Ru

Rambler's Top100

Programming Blogs - BlogCatalog Blog Directory


Как установить бит в числе?

Delphi FAQ >> Алгоритмы

Процедура на Delphi SetBit устанавливает указанный бит в числе

procedure SetBit(var N: Longint; nBit: Byte);
{N - число
 nBit - номер бита}

begin
  N := ((1 shl (nBit - 1)) or N);
end;


Сейчас музыка mp3 легко ищется в Интернете.