[nuk3zito]

Empezado por edgaronfo

...
Y luego use el TSXLPageProducer para que automáticamente me generara la cadena original (Ejemplo de TSXLPageProducer):

procedure TForm1.bttnCadenaOriginal1Click(Sender: TObject);
var xslt_source : string;
begin
  xslt_source := 'cadenaoriginal_2_0.xslt';
try
   XMLDoc.Active := False; // just in case
   XSLPageProducer1.FileName := xslt_source;
   XSLPageProducer1.XMLData := XMLDoc;
   XMLDoc.Active := True;
   Memo1.Text := XSLPageProducer1.Content; // Transform!!
 except
   on E: Exception do
     Memo1.Text := E.Message
 end;
end;

Y así dejas que delphi se haga bolas por tí, jejeje.
espero que sea de ayuda para alguien como lo fue para mí.
...

Te la rifaste con ese código... yo no sabía como obtener la cadena original en Delphi (en C# no me dio nadita de problemas).

En serio, te agradezco el aporte. Solo me resta probarlo.