请教,关于in的用法.

Question

我这有一个要实现的功能,具体是这样的,判断一个字符是否在一个集合里,当然可以用 buf[1] in ['a','b','e'],但可不可以将[..]用一个变量(比如:myset)代替,即rbuf[1] in myset 多谢!

Answer 1

var myset : set of char;
begin
  include(myset,'a');  //myset := myset + 'a'
  exclude(myset,'b');  //myset := myset - 'b'  if 'a' in myset then
  showmessage('if ''a'' in myset then');
end;