频道分类

delphi中in的使用

作者:admin 来源: 日期:2021/1/29 13:02:13 人气: 标签:

 
问题: 在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;

注意:如果出现Operator not applicable to this operand type 提示错误,是因为 in 没有被括号保住。