Как вытащить значения переменной типа set?

← →
MaxNv (2003-12-31 01:14) [0]

Вот есть переменная типа set of byte. Как добавлять туда значения понятно, а вот как вытащить их оттуда? Для set есть только оператор in, но это только чтобы проверить есть такое значение или нет в set"е. А вот как их все оттуда вытащить? Сасибо заранее.

← →
Holy © (2003-12-31 03:02) [1]

А никак, хотя если проверить на вхождение все числа от 0 до 255, то как бы вытащишь.

← →
Романов Р.В. © (2003-12-31 06:46) [2]

var
i: Byte;
begin
for i := Low(Byte) to High(Byte) do
...

← →
Digitman © (2003-12-31 13:12) [3]

> А вот как их все оттуда вытащить?

в виде чего ?

вообще-то их и "вытаскивать" не нужно, они все у тебя под рукой уже

type
TMySetOfByte = set of byte;
..
var
MyByteSet: TMySetOfByte; //оно (множество) уже здесь, в любой момент времени доступно и представляет из себя массив из 32-х байт (или массив из 16-ти слов, или массив из 8-ми двойных слов - как удобней)

пример чтения сразу 32-х младших элементов множества :

type
PDWordArray = ^TDWordArray;
TDWordArray = array[0..SizeOf(TMySetOfByte) shr 2 - 1]

var
SubSet: DWord;
..
SubSet := PDWordArray(@MyByteSet)[0]; // готово, прочитали сразу 32 младших последовательно идущих элемента мн-ва

TDWordArray = array[0..SizeOf(TMySetOfByte) shr 2 - 1] of DWord

Как вытащить значения переменной типа set? Найти похожие ветки