No hay respuestas en este tema

[edorantes]

Hola amigos, tengo un nuevo problema, como había posteado antes sobre web service de facturación elctronica, que por cierto ya esta resuelto,
bueno ahora lo que pasa es que mando los datos por un arreglo de objetos que me da el web service pero el problema es que cuando meto
muchos productos entonces el objeto repite los datos ejemplo:
Tenemos los productos, cada uno esa en una lista de Tstrings
Cantidad | descripción | precio |
    1.0          Coca            7.50
    2.0          Fanta            6.00

entonces estos estan almacenados en una lista y lo agregamos al arreglo de objetos asi

delphi

var
 datosConceptos : ConceptoR; 
 conceptosFel : ArrayOfConceptoR;
 cantU,preU: TXSDecimal;
begin
 datosConceptos := ConceptoR.Create();
 cantU:= TXSDecimal.Create;
 preU:= TXSDecimal.Create;
 
 SetLength(conceptosFel,desc.Count);
      for i := 0 to desc.Count-1 do begin
        cantU.DecimalString := cantidad.Strings[i];
        preU.DecimalString := precio.Strings[i];
 
        datosConceptos.cantidad := cantU; //el web service me los pide como TXSDecimal
        datosConceptos.descripcion := desc.Strings[i];
        datosConceptos.valorUnitario := preU; //el web service me los pide como TXSDecimal
        conceptosFel[i] := datosConceptos;//Aqui agregamos al arreglo de objetos de tipo conceptoR
      end;
end;

Una vez que lleno el arreglo y genero el cfdi, reviso con el HTTP analyzer los datos que se envian y reulsta que el arreglo se llena
asi:

Cantidad | descripción | precio |
    2.0          Fanta            6.00
    2.0          Fanta            6.00

Toma el ultimo y lo repite para todos sin importar cuantos productos mande, siempre reite el ultimo,
¿Estos haciendo algo mal? agradezco sus respuestas, espero me di a entender.