Bom dia, estive realizando alguns testes e parece que mesmo com a opção nova não é possível carregar os Documentos, debugando o programa notei que ao validar o XML no TCTeXmlReader.ValidarXML ele não consegue encontrar o infCte, no CTeNode := Document.Root ele retorna a estrutura <cteProcSimp><CTeSimp>...</CTeSimp><protCTe>...</protCTe></cteProcSimp> e quando tenta utilizar o CTeNode.Childrens.FindAnyNs('infCte') os Childrens a serem considerados são "CTeSimp" e "protCTe" creio que o correto seria criar uma nova condição `if Document.Root.Name = 'cteProcSimp' then` e dentro setar o CTeNode := Document.Root.Childrens.FindAnyNs('CTeSimp');.
Outro problema que vi é no carregamento de informações para a impressão, dentro do TIdeHandler.LerIde ele lê o Toma3 e Toma4 e como não existe essas tags de Tomador nesse tipo de Documento o ide.Toma3 é setado como "Remetente" (0) e no ACBrCTeDACTEFR ao tentar carregar o Tomador ficaria errado, também existem outros problemas na geração de PDF já que não carrega os dados na ACBrCTeDACTEFR. Estou fazendo algumas alterações e testando por enquanto, caso estejam de acordo passo futuramente para vocês.