delphi集合

1 开域语句
在面向对象的程序代码中，嵌套对象的现象十分普遍，我们经常会去引用很深层的对象。如：
form1.canvas.font。当对一个深层对象设多个属性的时候，要写很多重复的符号，麻烦且容易出错。为此，delphi设计了开域语句。
格式： width 对象 do ...； 一般情况下都是跟随多条语句，所有几乎总是用复合语句，即
width 对象 do begin ... end；
例如： with form1.canvas.font do
begin color := clRed; size := 15; name:='宋体' end;
2 集合的使用
delphi中的集合是对数学中集合的概念的简单实现。要求是集合中的元素必须同类型，且必须是序数类型，且集合中可能的元素个数不能大于255。
定义： type 集合类型名 = set of 元素类型
例如： type MySet = set of char; //注意 char 的个数本来就不超过255。
type MyItem = (sun, moon, star); MyItem2 = 1..100;
type MySet2 = set of MyItme; MySet3 = set of MyItem2;
◇我们可以测试给定的元素是否在某个集合中。 var A: MySet; 'a' in A ?
◇集合的常量表达法： ['a','x','c']； [1,2,4..10]； [sun, moon]
◇空集的表示法： []
◇集合间可以直接赋值。 A := []; A := [1,2,6]; A := B;
◇集合间可以进行标准的运算： A+B 并集； A-B 差集； A*B 交集
我们经常使用集合来表达用户对多选控件的选择情况。因为delphi定义了标准的集合运算，就使得我们处理类似：“两个用户公共选择了哪些项？”“从选择中去掉固定的一组选则”这样问题变得十分简单容易。delphi的控件属性中，有很多的是集合类型的例子。比如
with form1.canvas.font do style := style + [fsItalic] 就是增加了斜体特征。