Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.04.13;
Скачать: CL | DM;

Вниз

Множества set of   Найти похожие ветки 

 
San1   (2008-03-20 13:47) [0]

Здравствуйте! Подскажите пожалуйста.

Есть множество TState= set of (s1,s2,s3,s4,s5);
var
state:TState;

делаю следующее:
...
include(State,s1);
include(State,s2);
...

Необходимо проверить вхождение добавленных значений в множество

if (sgOver in FStatusGame) or (sgVictory in FStatusGame) then Exit;

Можно ли записать это короче? Что-то вроде:

if (sgOver or sgVictory) in FStatusGame then Exit;


 
Reindeer Moss Eater ©   (2008-03-20 13:49) [1]

чтобы можно было короче нужны не множества, а битовые маски.


 
San1   (2008-03-20 13:51) [2]

А что это такое - битовые маски?


 
Reindeer Moss Eater ©   (2008-03-20 13:52) [3]

Либо зайти с другого бока и определить заранее предопределенные подмножества можества типа как это сделано для

dsEditModes


 
Плохиш ©   (2008-03-20 13:58) [4]


> Можно ли записать это короче? Что-то вроде:
>
> if (sgOver or sgVictory) in FStatusGame then Exit;


if ([sgOver, sgVictory] * FStatusGame) <> [] then Exit;


 
Reindeer Moss Eater ©   (2008-03-20 13:58) [5]

//if (sgOver or sgVictory) in FStatusGame then Exit;

if ((2 or 4) and 12) > 0 then Exit


 
Семеныч   (2008-03-20 14:38) [6]

[4]. И говорить более не о чем.



Страницы: 1 вся ветка

Текущий архив: 2008.04.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
2-1205758370
Sergey2
2008-03-17 15:52
2008.04.13
Убрать первоначальную форму.


2-1205775125
johnsmith
2008-03-17 20:32
2008.04.13
Имя поля в наборе данных


15-1204116119
Finder
2008-02-27 15:41
2008.04.13
Веб-клиент IRC


2-1205605298
Berkoot
2008-03-15 21:21
2008.04.13
Memo поле в таблице Paradox


15-1204196510
Pos Eleptant (c)
2008-02-28 14:01
2008.04.13
Bitmap в Grid