Alain Michaud wrote:
> sorry, my message was misleading. I am lookimng for the 'nice' and fast
> way do do this. How do write it please (if you know from memory)?
type
TEnum = (one, two, three);
TSet = set of TEnum;
var
myset: TSet;
begin
myset := [two];
if one in myset then
writeln('one is in myset');
end;
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
