Boa Tarde.
Favor corrigir a formatação dos campos double no componente ACBrSedex pois estão com erro, pois se mandar na atual formato não retorna o valor calculado certo.
Segue abaixo exemplo:
url original do componente com a formatação: FormatFloat('#,00', Value) http://ws.correios.com.br/calculador/CalcPrecoPrazo.aspx?nCdEmpresa=&sDsSenha=&sCepOrigem=90630070&sCepDestino=96508011&nVlPeso=001&nCdFormato=1&nVlComprimento=020&nVlAltura=010&nVlLargura=030&sCdMaoPropria=N&nVlValorDeclarado=1.500&sCdAvisoRecebimento=S&nCdServico=40010&nVlDiametro=000&StrRetorno=xml Retorno <Servicos> <cServico> <Codigo>40010</Codigo> <Valor>22,10</Valor> <PrazoEntrega>1</PrazoEntrega> <ValorSemAdicionais>18,50</ValorSemAdicionais> <ValorMaoPropria>0,00</ValorMaoPropria> <ValorAvisoRecebimento>3,60</ValorAvisoRecebimento> <ValorValorDeclarado>0,00</ValorValorDeclarado> <EntregaDomiciliar>S</EntregaDomiciliar> <EntregaSabado>N</EntregaSabado> <Erro>0</Erro> <MsgErro/> </cServico> </Servicos>
url com correção da formatação: FormatFloat('#.00', Value) http://ws.correios.com.br/calculador/CalcPrecoPrazo.aspx?nCdEmpresa=&sDsSenha=&sCepOrigem=90630070&sCepDestino=96508011&nVlPeso=1,000&nCdFormato=1&nVlComprimento=20,000&nVlAltura=10,000&nVlLargura=30,000&sCdMaoPropria=N&nVlValorDeclarado=1500,00&sCdAvisoRecebimento=S&nCdServico=40010&nVlDiametro=,000&StrRetorno=xml
Retorno
<Servicos> <cServico> <Codigo>40010</Codigo> <Valor>43,85</Valor> <PrazoEntrega>1</PrazoEntrega> <ValorSemAdicionais>18,50</ValorSemAdicionais> <ValorMaoPropria>0,00</ValorMaoPropria> <ValorAvisoRecebimento>3,60</ValorAvisoRecebimento> <ValorValorDeclarado>21,75</ValorValorDeclarado> <EntregaDomiciliar>S</EntregaDomiciliar> <EntregaSabado>N</EntregaSabado> <Erro>0</Erro> <MsgErro/> </cServico> </Servicos>
em anexo unit ACBrSedex.pas com as devidas correções.
ACBrSedex.pas