Centro de ayuda OfiPro

Tratamiento de los datos con Delphi

Tratamiento de los datos con Delphi

Anterior Siguiente Apartado sin directorio Expand/collapse all hidden text  

Tratamiento de los datos con Delphi

Anterior Siguiente La lista de apartados requiere JavaScript Se requiere JavaScript para expandir el texto Se requiere JavaScript para imprimir 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.

 

 

 

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 gráficos

 

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;