Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-07-2014
Alexis De la Cr Alexis De la Cr is offline
Miembro
 
Registrado: may 2006
Ubicación: Puebla
Posts: 124
Poder: 18
Alexis De la Cr Va por buen camino
No aparece la leyenda encoding="UTF-8" en la cabecera de XML

Estimados amigos de Club Delphi

Les comento el siguiente problema que tengo. Tengo una Aplicación que genera CFDI desarrollada en delphi 2007 y la cual funciona correctamente en todas sus etapas. Sin embargo, por necesidades ajenas a mi, estoy migrando el codigo a Delphi XE2, y aqui vienen los problemas, los cuales he podido ir solucionando, pero hay uno que no hallo como, y esta relacionado con la generacion del archivo xml. Resulta que a la hora de Escribir el Archivo XML, no guarda la leyenda encoding="UTF-8" y aparece asi

Cita:
<?xml version="1.0"?>
cuando deberia aparecer de la siguiente forma

Cita:
<?xml version="1.0" encoding="UTF-8"?>
Entiendo que a partir de la Version 2009 ha habido cambios, sobre todo con la introduccion del unicode y pienso que debe ir por esta direccion el problema. El codigo que utilizo es el siguiente

Código Delphi [-]
  xmlDoc := TXMLDocument.Create(nil);
  xmlDoc.Active := True;
  xmlDoc.Version:='1.0';
  xmlDoc.Encoding:='UTF-8';
  iNode := xmlDoc.AddChild('cfdi:Comprobante') ;
  iNode.DeclareNamespace('cfdi','http://www.sat.gob.mx/cfd/3');
  .
  .
  .
  xmlDoc.XML.SaveToFile('c:\temporal.xml');
  xmlDoc.Active:=False;
  xmlDoc:=nil;


Alguna Sugerencia? Muchas Gracias por su ayuda
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Usar TServerSocket y TClientSocket para enviar "streams" más o menos "grandes" dec Internet 9 04-08-2015 16:11:50
No me aparece la pestaña "Data Controls" en RAD Studio EX2 UDKO2 Varios 2 13-08-2012 16:35:52
Me aparece el error "Insufficient memory for this operation." ilichhernandez Varios 5 23-07-2010 18:48:16
Cabecera doble en grilla "DBGrid" StartKill Varios 3 11-11-2008 14:31:44
No aparece "InstallShield Objects for Delphi" en el InstallShield Express Pikot Varios 0 05-02-2007 05:00:26


La franja horaria es GMT +2. Ahora son las 22:21:40.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi