Логическая операция AND над двумя масками
procedure LogicalAND(Source: TBitStore);
Результат присваивается в исходный класс Результат присваивается в исходный класс