ocorrendo um erro no metodo SavePdf do cte
{ with RLPDFFilter1.DocumentInfo do
begin
// Title := ACBrStr('DACTE - Conhecimento nº ') + FormatFloat('000,000,000', FCTe.Ide.nCT);
Title := 'DACTE - Conhecimento nº ' + FormatFloat('000,000,000', FCTe.Ide.nCT);
KeyWords := 'Número:' + FormatFloat('000,000,000', FCTe.Ide.nCT) +
'; Data de emissão: ' + FormatDateTime('dd/mm/yyyy', FCTe.Ide.dhEmi) +
'; Destinatário: ' + FCTe.Dest.xNome +
'; CNPJ: ' + FCTe.Dest.CNPJCPF;
end; }
eu comentei as linhas de modificação do documento e funcionou normal.
eu fiz assim para corrigir
with RLPDFFilter1.DocumentInfo do
begin
Title := 'DACTE - Conhecimento nº ' + FEventoCTe.InfEvento.Id;
KeyWords := 'Número:' + FEventoCTe.InfEvento.Id +
'; Data de emissão: ' + FormatDateTime('dd/mm/yyyy', FEventoCTe.InfEvento.dhEvento) ;
end;
pois FCTe não estava instanciado