2010-12-29 3 views
2

컬렉션 항목을 컬렉션에 추가 할 때 색인은 0부터 시작한다는 것을 알고 있습니다. 저는 이것을 하나의 기반으로 만들고 Id이라는 속성에 값을 표시하고 싶습니다. 누군가이 코드에 대해 어떻게 생각하는지 말해 줄 수 있습니까?TCollection에 추가 할 때 TCollection 항목의 인덱스 번호 얻기

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

이 조심 사용자의 요구를 이해한다면 그렇게해야한다. 'TCollectionItem'에는 이미 [ID'라는 속성이 있습니다] (http://docwiki.embarcadero.com/VCL/en/Classes.TCollectionItem.ID). 또한 오브젝트 인스펙터에 표시되지 않기 때문에 편집 할 수없는 경우 속성을 게시하는 것이 중요하지 않습니다. –

+0

OK, 고마워요,하지만 그게 예 였어요 ... 그래서 성명을 SeqNo라고 말하면 – IElite

답변

4

결과 : = 인덱스 + 1 내가 제대로

+0

정확하게 이해했습니다. 대답과 내가 무엇을 찾고 있었는지. 나는 이전에 그것을 가지고 컴파일 할 수 없었다. 그것은 또 다른 문제였습니다. 나를 계속 지켜 줘서 고마워. – IElite