Процедура Exclude в Delphi исключает значение из переменной набора (множества).
System unit
procedure Exclude (var SetVariable : set of SetValues; OneOfSet : SetValues);
Процедура Exclude исключает значение набора из переменной набора.
Переменная набора – та, которая может содержать 0, в некоторых, или во всех значения набора. Когда Вы Исключаете значение набора из переменной набора, Вы удаляете её значение из включенных в переменную значений.
Exclude эквивалентно оператору показанному здесь:
Exclude(CardHand, JackOfClubs); CardHand := CardHand - [JackOfClubs];
Например, Вы можете удалить игральную карту из рук игроков – где рука основана на наборе всех игральных карт на столе.
Используйте Include, чтобы добавить значение в переменную набора. Это, например, позволило бы карте быть добавленной в руку игрока.
Процедура Exclude: Создание переменной, содержащей только положительные числа от 0 до 10
var
evenNumbers : Set of 0..10;
i : Integer;
begin
// Удостоверяемся, что evenNumbers содержит только четные числа
evenNumbers := [0..10];
for i := 0 to 10 do
if (i mod 2) > 0
then Exclude(evenNumbers, i);
// Теперь отображаем содержимое набора
for i := 0 to 10 do
if i in evenNumbers
then ShowMessage(IntToStr(i)+' четно');
end;Результат
0 четно
2 четно
4 четно
6 четно
8 четно
10 четно
Похожие функции, процедуры и команды
In — используется, чтобы проверить, является ли значение членом множества.
Include — включает значение во множество переменных.
Set — определяет множество до 255 различных значений.
Угостить автора чашечкой кофе