Ver Mensaje Individual
  #5  
Antiguo 03-06-2024
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 646
Reputación: 23
mRoman Va por buen camino
Ya lo generé, pero no lo genera igual que el tuyo...por cierto jamas mencioné la version Delphi q estoy usando, Delphi6.

Asi lo genera
Código:
{****************************************************************}
{                                                                }
{                    Delphi XML Data Binding                     }
{                                                                }
{         Generated on: 03/06/2024 02:06:09 p. m.                }
{       Generated from: D:\Sistemas\XML\Archivos XML\DATOS.xml   }
{                                                                }
{****************************************************************}
unit DatosComprobante;

interface

uses xmldom, XMLDoc, XMLIntf;

type

{ Forward Decls }

  IXMLComprobante = interface;
  IXMLInformacionGlobal = interface;
  IXMLCfdiRelacionados = interface;
  IXMLCfdiRelacionadosList = interface;
  IXMLCfdiRelacionado = interface;
  IXMLEmisor = interface;
  IXMLReceptor = interface;
  IXMLConceptos = interface;
  IXMLConcepto = interface;
  IXMLImpuestos = interface;
  IXMLTraslados = interface;
  IXMLTraslado = interface;
  IXMLRetenciones = interface;
  IXMLRetencion = interface;
  IXMLACuentaTerceros = interface;
  IXMLInformacionAduanera = interface;
  IXMLInformacionAduaneraList = interface;
  IXMLCuentaPredial = interface;
  IXMLCuentaPredialList = interface;
  IXMLComplementoConcepto = interface;
  IXMLParte = interface;
  IXMLParteList = interface;
  IXMLInformacionAduanera = interface;
  IXMLImpuestos = interface;
  IXMLRetenciones = interface;
  IXMLRetencion = interface;
  IXMLTraslados = interface;
  IXMLTraslado = interface;
  IXMLComplemento = interface;
  IXMLAddenda = interface;

{ IXMLComprobante }

  IXMLComprobante = interface(IXMLNode)
    ['{797224A1-3B7B-4FF0-B401-255EF9005B48}']
    { Property Accessors }
    function Get_Version: WideString;
En esta parte del código q envío, no sale igual como el que tu generaste...hice lo q me indicaste, pero me hace ruido el que no tenga para crear proyectos VCL, solo CLX. Tienes alguna idea del porque no se genera como el tuyo??. Al momento de compilar el programa me marca errores: "[Error] DatosComprobante.pas(42): Identifier redeclared: 'IXMLInformacionAduanera", los encerre entre llaves y marca otro error:



Es una imagen, espero se vea.

Gracias.
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!

Última edición por mRoman fecha: 04-06-2024 a las 00:01:43.
Responder Con Cita