枚举类型的比较
定义了一个变量 var frmState : TFormState;
Begin
FrmState := Form1.FormState;//正常
IF FrmState = fsCreating then //报错！类型不符
End;
问题是：fsCreating同样也是TformState类型，为什么会报错！
[解决办法]
IF fsCreating in FrmState then
枚举类型是一种特殊的集合类型.
