Ola amigo tente assim:
case Self.FNFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[X].resEvento.tpEvento of
teCCe: Self.FNFEManifesto.Itens.situacao_manifesto := 0; teManifDestConfirmacao: Self.FNFEManifesto.Itens.situacao_manifesto := 2; teManifDestDesconhecimento: Self.FNFEManifesto.Itens.situacao_manifesto := 4; teManifDestOperNaoRealizada: Self.FNFEManifesto.Itens.situacao_manifesto := 5; teManifDestCiencia: Self.FNFEManifesto.Itens.situacao_manifesto := 3; end;
agora eles mudaram para o ResEvento.tpEvendo.