W wxcayap Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-09 #1 TPurpose = (ForAdd, ForEdit); 那为高手能为小弟分析一下
A AJ Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-09 #3 枚举类型, 其实ForAdd == 0, ForEdit == 1; 还有一种是TPurpose = set of (ForAdd, ForEdit); var Purpose : TPurpose ; begin Purpose:= [ForAdd, ForAdd]; //你可以这样判断Purpose里有什么东西, [ForAdd] in Purpose; end;
枚举类型, 其实ForAdd == 0, ForEdit == 1; 还有一种是TPurpose = set of (ForAdd, ForEdit); var Purpose : TPurpose ; begin Purpose:= [ForAdd, ForAdd]; //你可以这样判断Purpose里有什么东西, [ForAdd] in Purpose; end;
