先看例子。如下所示：
type
TCharSet = set of char;
TEnum = (Monday, Tuesday, Wednesday, Thursday, Friday, Saturday, Sunday);
TEnumSet = set of TEnum;
procedure TForm1.Button3Click(Sender: TObject);
var
charset : TCharSet;
enumSet : TEnumSet;
intset : set of 0..9;
alphaset : set of 'a'..'c';
begin
charset := ['A'..'Z', 'a', 'b', 'h'..'z'];
enumSet := [Saturday, Sunday];
intset := [1, 2, 4..6];
alphaset := ['a'..'e'];
Include(charset, 'c'); //追加c
charset := charset + ['d']; //追加d
Exclude(charset, 'x'); //删除x
charset := charset - ['y', 'z']; //删除y,z
ShowMessage(BoolToStr('n' in charset, True)); //True
ShowMessage(BoolToStr(['a'..'d'] = charset * alphaset, True)); //True
end;
-------------------------------------------------------------------------
+(Include): 追加
- (Exclude):删除
* : 交集
注意：
集合最多可以容纳256个元素。所以下面的定义是无效的：
type
TStringSet = set of String;
TIntegerSet = set of Integer;
集合在内部把元素按单独的位进行存储，使得集合操作在速度和内存上相当高效。少于32个元素的集合可以用CPU寄存器操作，这个效率更高。超过32个元素(含32个)的集合(比如char集合--255个元素)则存储在内存中。所以为了更高效，尽量定义集合中基本类型的元素数量少于32个。
资料：
集合(Set)是由具有某些共同特征的元素构成的一个整体，这些元素必须是有序类型，如，整型、布尔型、字符型、枚举型和子界型。
1．集合类型的定义
集合类型变量定义的语法格式为：
type
<类型标识符>=set of<基类型>
其中，基类型是指集合中的元素必须是同一有序数据类型。Pascal语言规定集合的元素个数最多不得超过256个；因此基类型的序数值必须在O～255之间，例如：
type
Name=set of char；
Boolset=set of boolean；
Weekday=(Sun，Mon，Tue，Wed，Thu，Fri，Sat)；
Week：set of weekday；
2．集合变量的定义 ’
集合类型定义的语法格式为：
(1)已定义集合类型
var<变量名>：<集合类型标识符>；
(2)与类型定义结合在一起 ．
var<变量名>：set of<基类型>；
傻f如： var si：set oi-O．．25 5；
sn：Name；
si是整数类型的集合变量，sn是Name集合类型的变量。
3．集合变量的赋值
程序中可以对集合变量赋集合常量值，例如：
si：=[1．．6，9]；
sn：= [’A’．．’Z’，’a’．．’z’，’O’．．’9’]；
集合类型变量的取值范围为包含空集在内的集合的所有子集，但是集合中的元素不能重复出现o
4．集合类型的运算
集合类型能够进行比较运算和集合运算。
集合的比较运算有“<=”、“>=”和“in/"，分别表示包含于、包含和属于运算。此外还有
“=”、“<>/"表示集合相等和集合不等，例如：[1，2]<=[1．．3]的结果是true；1 in[O．．6]的结果是true。
集合运算有并(+)、交(木)、差(一)运算，它们的结果还是一个集合。例如：
集合A：[1，2，6，7]
集合B：[2，3，5，6，7，9]
集合A+B：[1，2，3，5，6，7，9](由属于集合A或属于集合B的所有元素组成)
集合A*B：[2，6，7](由属于集合A又属于集合B的所有元素组成)
集合A-B：[1](由属于集合A而不属于集合B的所有元素组成)