Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

Pag.add


Go to solution Solved by Régys Silveira,
  • Este tópico foi criado há 2985 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

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

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.