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

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

снова про приведение типов) [D5, Win2k]


MetalFan ©   (2004-09-03 18:48:00) 

type
 TElement = (e1, e2, e3, e4);
 TElements = set of TElement;
var
 Elemets: TElements;
 Bt: Byte;
begin
 Elemets := [e1,e4];
 Bt := Byte(Elements); <= работает
 Elements := TElements(Bt); <= нет
end;

почему? у кого какие соображения?


MetalFan   (2004-09-06 12:11:00) [1]

гм... у меня тоже заработало! че-то я напутал(


Cobalt   (2004-09-03 19:40:00) [2]

var
Eleme nts: TElements;

И всё работает!


MetalFan   (2004-09-03 19:25:00) [3]

SizeOf(TElements) = 1 !!!


Palladin   (2004-09-03 18:56:00) [4]

потому что SizeOf(TElements)=32


Наверх

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