carta de correcao com erro

[jbaneto]

List index out of bound(0)

esse é o erro que da na carta de correção, ja testei o demo e da o mesmo erro

na unit pcnRetCCeNFe, gostaria de saber se alguem resolveu.

na linha

function TRetInfEventoCollection.GetItem(

Index: Integer): TRetInfEventoCollectionItem;

begin

Result := TRetInfEventoCollectionItem(inherited GetItem(Index)); // essa linha aqui

end;

grato pela atenção