Que tal.
Probablemente esto te sirva:
Código Delphi
[-]
procedure TfrmPrincipal.generaPdf(archivo: String);
var
recibo: IXMLComprobante;
timbreFiscal: IXMLTimbreFiscalDigital;
XMLDocument1: TXMLDocument;
begin
recibo := LoadComprobante(archivo);
XMLDocument1.Xml.Text := recibo.Complemento.ChildNodes.FindNode('tfd:TimbreFiscalDigital', '').Xml;
XMLDocument1.Active := True;
timbreFiscal := GetTimbreFiscalDigital(XMLDocument1);
showMessage(timbreFiscal.UUID);
end;