1. 比如定义一个状态集合(开始,结束)
TDiscernState = (fdsStart,fdsStop);
变量定义
fStstus: TDiscernState;
赋值
fStstus:= fdsStart;
判断状态的时候,则写成
if fStatus= fdsStart then
begin
end;
2. 比如定一个身份集合(学生老师家长):
type
TRoleMOde= 0..2; //身份角色
const
wmStudent= TRoleMOde(0); //学生
wmTeacher= TRoleMOde(1); //教师
wmFamilly= TRoleMOde(2); //家长
这种定义的好处是,wmStudent= 0; wmTeacher= 1; wmFamilly= 2
if fRole= 0 then
begin
end;
if fRole= wmStudent then
begin
end;
在某些使用环境下,这种定义方便些。