Получение индекса # элемента TCollection при добавлении в TCollection

Question

Я знаю, что когда я добавляю элемент коллекции в коллекцию, индекс имеет нулевое значение. Я хотел бы сделать это на основе одного и показать значение в свойстве под названием 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; 

Answer 1

результат: = Индекс + 1 должен сделать это, если я правильно понимаю ваши потребности