Set - add & remove valores em conjuntos

Adicionando/Removendo valores em conjuntos

Se você manipula conjuntos, você provavelmente já escreveu um código como 

este para adicionar e remover membros de um conjunto:

CurrentSet := CurrentSet + [newSetValue];

CurrentSet := CurrentSet - [newSetValue];]

Isto funciona, mas não é muito eficiente. 

Entretanto, você pode utilizar-se de dois procedimentos: 

Include() e Exclude(). Ficaria mais ou menos assim:

Include(CurrentSet, newSetValue);

Exclude(CurrentSet, newSetValue);

Estas procedures fazem a mesma coisa que as duas linhas iniciais, 

mas gera um código mais eficiente e atribuições explícitas.