Nueva GH Freebrary (open source) "beta"

[AGAG4]

Saludos alberto, OTRO ZARANDEADO ??

Ando investigando apenas como leer un archivo XML como si fuera un dataset ó un archivo .ini, serviria la liberia GHFXMLDoc.pas ??

Tienes ejemplos de como se usa ??

saludos....

[[Al González]]

Hola Alfredo, que gusto verte (ahora a distancia).

Sí te sirve, pero no como data set. Es decir, no puedes simplemente asignarla a un TDataSource, ya que TghXMLDoc es para leer y escribir cualquier archivo XML, pero "a patín" (aunque no estaría mal añadirle algunos métodos para pasar en automático información a un TDataSet).

Sería bueno, si gustas, que adjuntaras aquí uno de los archivos que deseas leer (si es información sensible la puedes alterar) y me dices cuáles son los datos a extraer, para ponerte un ejemplo de cómo sería usando esta clase.

Abrir el archivo no tiene ciencia, pero para ubicar la información a leer cuenta con varios métodos que soportan expresiones XPath (FindNode, FindNodes, LocateNode, Node y Nodes).

Código Delphi [-]
Var
  Doc :TghXMLDoc;
Begin
  Doc := TghXMLDoc.Create ('C:\AGAG4\Docs\ReporteSemanal.xml');
  // Al constructor también se le puede dar el texto XML directamente
  
  Try
    // Aquí leer o modificar el contenido del documento (objeto Doc)

    Doc.Save;  // Guardar los cambios en el mismo archivo
    // O bien, guardar el documento con otro nombre:
    Doc.Save ('C:\AGAG4\Docs\ReporteModificado.xml');
  Finally
    Doc.Free;
  End;

Esta clase emplea una de las APIs de Windows, llamada MSXML. Con la clase intento que el trabajo del programador resulte más sencillo.

Ya sabes, si gustas pon por aquí una copia del documento o algo que se le parezca y con gusto hacemos el ejercicio de cómo leer el contenido.

Saludos.

Al.

P.D. El siguiente zarandeado lo invitaré yo.

[[Al González]]

Acabo de subir una actualización. Respecto a la anterior, se incluyen unas 30 funciones adicionales, varias de ellas para manejo de cadenas de caracteres y conversión de valores numéricos a su expresión con letras. Otras son para operaciones matemáticas aplicando redondeo, además de funciones para mostrar mensajes de diálogo al usuario, entre diversas más.

La parte más relevante de esta actualización consiste en las unidades GHFXXX_Reg del directorio Registration, con las que ahora ya pueden instalarse los componentes en el IDE.

Incluí también dos archivos de texto: License.txt (la licencia, misma que está en el interior de los .pas) e Install.txt (las instrucciones de instalación).

Las clases de componentes instalables en la paleta son:

• TghDataSource
• TghClientDataSet
• TghDataSetProvider
• TghSQLConnection
• TghFirebirdSQLConnection
• TghSQLQuery
• TghSavePoints

http://terawiki.clubdelphi.com/Delph...7_20130120.zip

Reitero mi agradecimiento a los amigos Delphi que han mostrado interés en probar y comentar sus puntos de vista sobre este trabajo, a fin de ayudar a perfeccionarlo.

Un saludo.

Al.

[Neftali [Germán.Estévez]]

Gracias de nuevo a tí, Al; Por compartir y mejorar esta librería.

[Casimiro Notevi]

Gracias...

[[fjcg02]]

Empezado por Neftali

Gracias de nuevo a tí, Al; Por compartir y mejorar esta librería.

...biblioteca...

que si no Al se enfada

Saludos

[[nlsgarcia]]

Al González,

Excelente

Nelson.

[marcoszorrilla]

Muchas gracias Al.

Un Saludo.

[[Al González]]

Empezado por AGAG4

[...] como leer un archivo XML [...] Tienes ejemplos de como se usa ??

Hola amigos. He preparado un ejemplo muy sencillo de cómo leer un archivo XML con TghXMLDoc. Se extrae la información contenida en éste y se muestra en un TMemo y en un TDBGrid.

fjcg02 hizo el favor de proporcionarme un archivo XML que le interesaba poder leer, y entonces hice este pequeño programa:

http://terawiki.clubdelphi.com/Delphi/Ejemplos/Varios/?download=TghXMLDoc_EjemploLectura.zip (código fuente).



En este caso el contenido del XML no es nada complejo, pero si tuvieran otros archivos que quisieran leer o escribir desde Delphi, podemos elaborar más ejemplos y con ello enriquecer el tema.

Espero resulte de utilidad.

Saludos.

Al González.

[Casimiro Notevi]

Muy interesante, gracias

[[fjcg02]]

Gracias Al, eres muy benévolo conmigo.

Realmente te pedí que me pasaras código de ejemplo porque era incapaz de extraer la información del fichero.

Para información de todos, el fichero lo he extraido de la carga de autonomías de OpenERP. En OpenERP existen muchos más ficheros xml tanto con datos como con la información referente a la generación de pantallas, ...

OpenERP es un erp de código abierto hecho en phyton. Tiene servidor de aplicación, servidor web y hasta la versión 6.* cliente "pesado".

Gracias de nuevo, estudiaré el código a fondo.

Un saludo