Jump to content

dev botao

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

Recommended Posts

  • Membros Pro
Posted

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

×
×
  • 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.

The popup will be closed in 10 seconds...