要实现 Name in ['编号','年份','月份','已发'] 的语句是什么，初学者求教

Question

要实现 Name in ['编号','年份','月份','已发'] 的语句是什么，初学者求教

Answer 1

1 用 if 一个一个比较2 把 '编号','年份','月份','已发' 加入一个TStringList，用
    if TStringList.IndexOf(Name) >= 0 then
      ShowMessage('in');3 如果Name 中肯定不出现某个字符，例如 #0，可以用
    if Pos(#0+Name+#0,#0+'编号'+'年份'+'月份'+'已发'+#0) >= 0 then 
      ShowMessage('in');建议用 2