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

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

Биты в структурах


noname ©   (2004-09-14 15:50:00) 

Можно ли реализовать такой тип в Delphi:

typedef struct SomeStruct{
BYTE a1: 4;
BYTE a2: 3;
BYTE a3: 1;
}

То есть элемент размеров меньше 1 байта.


wal   (2004-09-14 16:11:00) [1]

Нечто похожее по функциональности, но не по сути:

type
 SomeStruct = class
    private
     FByte: Byte;
      functionGet_A1: Byte;
      functionGet_A2: Byte;
      functionGet_A3: Byte;
      procedureSet_A1(Value: Byte);
      procedureSet_A2(Value: Byte);
      procedureSet_A3(Value: Byte);
    public
      propertyA1: Byte readGet_A1 writeSet_A1;
      propertyA2: Byte readGet_A2 writeSet_A2;
      propertyA3: Byte readGet_A3 writeSet_A3;
  end;


С уважением.


Суслик   (2004-09-14 15:55:00) [2]

в точности так нельзя

но можно заменить это одним байтом - типом Byte и самому через битовые операции работать с битами


Наверх

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