Ver Mensaje Individual
  #2  
Antiguo 14-01-2015
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.331
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Un código como este:

Código Delphi [-]
var
  Items, Task: IXMLNode;
  XML:string;
  Doc: IXMLDocument;
begin

  Doc := NewXMLDocument;
  Items := Doc.AddChild('CdtTrfTxInf');
  //...
  Items := Items.AddChild('amt');
  Task := Items.AddChild('InstdAmt');
  Task.Attributes['Ccy'] := 'EUR';
  Task.NodeValue := '537.00';
  //...
  XML := Doc.XML.Text;
  Memo1.Lines.Text := XML;

Te dará un resultado como este:

Código:
<?xml version="1.0"?>
<CdtTrfTxInf>
<amt>
<InstdAmt Ccy="EUR">537.00</InstdAmt>
</amt>
</CdtTrfTxInf>
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita