Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 3923 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro
Postado

eu faco nfc-e o xml

depois uso o xml para imprimir em impressora usb

 

pego os produtos assim

 

 

                  for I := 0 to Det.Count-1 do   //AZUL PRODUTOS
                  begin
                    with Det.Items do
                     begin

                         Client_XML.Insert;
                         //Client_XMLNUMERO.Text:=IntToStr(Prod.nItem);
                         Client_XMLCODIGO.Text:= Trim( Prod.cProd );  //Prod.cProd;
                         Client_XMLNOME.Text:= UpperCase( Trim(Prod.xProd) );
                         //Client_XMLPRODUTO_ORIGINAL.Text:= UpperCase( Trim(Prod.xProd) );
                         //Client_XMLNCM.Text:=Prod.NCM;
                         Client_XMLUND.Text:=Prod.uCom;
                         Client_XMLQUANT.Text:=FloatToStr(Prod.qCom);
                         Client_XMLVALOR.Text:=FloatToStr(Prod.vUnCom);
                         //Client_XMLDESC.Text:=FloatToStr(Prod.vDesc);
                         Client_XMLTOTAL.Text:=FloatToStr(Prod.vProd);

                     end;

                  end ;

 

 

 

como façor para pega os pagamentos

 

-<pag>

   <tPag>99</tPag>

   <vPag>6.01</vPag>

</pag>

 

 

brigadooooooooooooo

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...