Почитайте!

Нас читают

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

Mail.Ru

Rambler's Top100

Programming Blogs - BlogCatalog Blog Directory


Как выключить бит в числе?

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

procedure BitOff(var N: Longint; nBit: Byte);
begin
  N := N and ((1 shl nBit) xor $FFFFFFFF);
end;


Подарите своему ребенку конструктор лего