Pessoal, como eu faço para enviar para impressora varias notas?
Deixa eu explicar um pouco mais minha necessidade:
1. eu já imprimir as notas.
2. no final do mês eu quero re-imprimir todas as notas que foram feitas no mês.
Eu não estou conseguindo enviar várias notas ao mesmo tempo.
Hoje eu tenho este código:
ACBrNFe1.NotasFiscais.Clear;
ACBrNFe1.NotasFiscais.LoadFromFile(qry_print_nfarquivo_xml.AsString);
if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis = teDPEC then
begin
ACBrNFe1.WebServices.ConsultaDPEC.NFeChave := ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID;
ACBrNFe1.WebServices.ConsultaDPEC.Executar;
ACBrNFe1.DANFE.ProtocoloNFe := ACBrNFe1.WebServices.ConsultaDPEC.nRegDPEC +' '+ DateTimeToStr(ACBrNFe1.WebServices.ConsultaDPEC.retDPEC.dhRegDPEC);
end;
ACBrNFe1.NotasFiscais.Imprimir;