Bom dia, agora deu erro, mais o estranho que coloquei pra compilar no passo a passo e o ACBRCteutil não compila parte desse arquivo, ele começa no 2:begin
dessa linha pra cima não passa pelo debug. obs.: atualizei o acbr agora pela manhã
Schema.remove('http://www.portalfiscal.inf.br/cte');
case Tipo of
1: begin
Schema.add('http://www.portalfiscal.inf.br/cte'
DFeUtil.SeSenao(DFeUtil.EstaVazio(APathSchemas),
PathWithDelim(ExtractFileDir(application.ExeName))+'Schemas\',
PathWithDelim(APathSchemas))+'cteModalAereo_v' + CTeModalAereo + '.xsd');
end;
2: begin
Schema.add('http://www.portalfiscal.inf.br/cte'
DFeUtil.SeSenao(DFeUtil.EstaVazio(APathSchemas),
PathWithDelim(ExtractFileDir(application.ExeName))+'Schemas\',
PathWithDelim(APathSchemas))+'cteModalAquaviario_v' + CTeModalAqua + '.xsd');
end;
3: begin
Schema.add('http://www.portalfiscal.inf.br/cte'
DFeUtil.SeSenao(DFeUtil.EstaVazio(APathSchemas),
PathWithDelim(ExtractFileDir(application.ExeName))+'Schemas\',
PathWithDelim(APathSchemas))+'cteModalDutoviario_v' + CTeModalDuto + '.xsd');
end;