我知道当我将一个集合项添加到集合时,索引是从零开始的。我想将它作为一个基础,并在名为Id
的属性中显示值。有人可以告诉我如何在代码中解决这个问题吗?
TCVSClassItem = class(TCollectionItem)
private
fId: Integer;
function GetId: Integer;
public
published
property Id: Integer read GetId;
end;
function TCVSClassItem.GetId: Integer;
begin
result:= ????
end;
答案 0 :(得分:4)
结果:=如果我正确理解您的需求,指数+ 1应该这样做