OfiPro

Tratamiento de los datos con Delphi

Tratamiento de los datos con Delphi

 Anterior Siguiente  

Tratamiento de los datos con Delphi

 Anterior Siguiente JavaScript is required for the print function Enviar consulta acerca de este apartado  

 

Si Vd. trabaja con Delphi como lenguaje de programación, podrá manejar fácilmente, de forma externa a OfiPro, los ficheros XML exportados.

 

A continuación se muestra un ejemplo de tratamiento de datos de los ficheros XML en Delphi.

 

 

NOTA

Notas sobre Ofipro

Proporcionamos estos ejemplos para que sirvan de guía a programadores externos para ayudarles en la tarea de tratar los datos exportados, pero no damos soporte sobre XML, Delphi, ni otros lenguajes o tecnologías de programación.

 

 

Para leerlo un fichero XML desde un programa en Delphi, utilice el componente TClientDataset:
 
ClientDataset.LoadFromFile('Articulos.xml');
 
 

hmtoggle_plus1Ejemplo de programa que lee el fichero Articulos.xml y exporta los graficos

 

Ejemplo de programa que lee el fichero Articulos.xml previamente exportado desde OfiPro, y graba los gráficos de los artículos en un fichero .jpg individual:

 
var
 Path,
 Referencia: string;
 cds: TClientDataset;

 fldReferencia: TField;
 fldGrafico: TBlobField;

 
begin
 
 // Sustituir Path por el adecuado...
 Path := 'C:\Users\Administrador\Desktop\';
 
 cds := TClientDataset.Create(nil);
 try
   cds.LoadFromFile(Path+'Articulos.xml');
 
   fldReferencia := cds.FieldByName('REFERENCIA');

   fldGrafico := TBlobField(cds.FieldByName('GRAFICOS'));
 
   cds.First;
   while not cds.Eof do
     begin
       Referencia := fldReferencia.AsString;
 
       // No se ha tenido en cuenta que Referencia puede tener caracteres no validos como nombre de fichero
       // Sustituir la extension .jpg por la adecuada...
       fldGrafico.SaveToFile(Path + Referencia + '.jpg');
 
       cds.Next;
    end;
 
 finally
   cds.Free;
 end;
 
end;