delphi中in的使用

问题: 在Delphi中，如何将集合数据类型中的某元素取出来？如set1:=[1,2,3,4,5,6]中的第三项3取出放入一变量中。 

Delphi的集合不同于数组或者List或者VB的Collection，它的元素是没有顺序，所以不存在某个集合中的第3项的说法。

你只能用in判断某个元素是否在Delphi的集合中。

如 if 3 in set1 then ... else ... 

例如 防止输入非整数字符 

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in [’0’..’9’, #8]) then //防止输入非整数字符
key := #0;
end;