From: Ray Lischner <delphi.at.tempest-sw.com@nospam.com>
Subject: Re: Bits
Date: 02 Mar 2000 00:00:00 GMT
Message-ID: <Ope+OGltkjTP4j0OqAiBKTosnswB@4ax.com>
Content-Transfer-Encoding: 7bit
References: <89lola$ngs3@bornews.borland.com>
Content-Type: text/plain; charset=us-ascii
X-Trace: 2 Mar 2000 08:22:34 -0800, 206.163.155.131
Organization: Tempest Software, Inc., Corvallis, Oregon
MIME-Version: 1.0
Newsgroups: borland.public.delphi.objectpascal

On Thu, 2 Mar 2000 10:49:46 +0100, "Grega" <spin.kranj@spin-kr.si> wrote:

>How can I set bits. I have a Byte and want to set bit 7 to 1, all other bits
>should be 0.

var
  B1: set of 0..7;
  B2: Byte;
begin
  B1 := [7];
  B2 := Byte(B1);

--
Ray Lischner, author of Delphi in a Nutshell (coming later this year)
http://www.bardware.com and http://www.tempest-sw.com