Форум: "Основная";
Текущий архив: 2004.09.19;
Скачать: [xml.tar.bz2];
Вниз
снова про приведение типов) Найти похожие ветки
← →
MetalFan © (2004-09-03 18:48) [0]
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;
почему? у кого какие соображения?
← →
Palladin © (2004-09-03 18:56) [1]потому что SizeOf(TElements)=32
← →
MetalFan © (2004-09-03 19:25) [2]SizeOf(TElements) = 1 !!!
← →
Cobalt © (2004-09-03 19:40) [3]
var
Elements: TElements;
И всё работает!
← →
MetalFan © (2004-09-06 12:11) [4]гм... у меня тоже заработало! че-то я напутал(
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.09.19;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.039 c
