一个简单的语句，不知道怎么写！:

关于网友提出的“ 一个简单的语句，不知道怎么写！:
”问题疑问，本网通过在网上对“ 一个简单的语句，不知道怎么写！:
”有关的相关答案进行了整理，供用户进行参考，详细问题解答如下：

问题： 一个简单的语句，不知道怎么写！:
描述:

AStr: string;
AStr := 'm';
有一个字符集合。例如：'asd', 'ed', 'grgr', 'm', 'de';
判断AStr是不是在这个集合里面，该如何写。 谢谢！

---

解决方案1:

同上

解决方案2:

type
  TAStr = Set of string;
var
  AStr, U: TAStr;
begin
  U := ['asd', 'ed', 'grgr', 'm', 'de'];
  AStr := 'm';
  if (Astr * U) <> [] then //求交集不为空集
  begin
    ...
  end;
end;

解决方案3:

if astr in ['asd', 'ed', 'grgr', 'm', 'de'] then
begin
//
end

解决方案4:

来迟了

以上介绍了“ 一个简单的语句，不知道怎么写！:”的问题解答，希望对有需要的网友有所帮助。
本文网址链接：http://www.codes51.com/itwd/2909833.html