image2data

Der Tech-Blog

...weitermachen, wo OCR aufhört

Plugin "XML-Verarbeitung" (i2dxXML)

Mai 042015

Dieses Plugin stellt Funktionen zum Parsen, Lesen und Erzeugen von XML-Dateien zur Verfügung.

Das folgende Skript iteriert über eine anzugebende XML-Datei und gibt die Knotennamen sowie die -inhalte im Debugfenster aus.

// **************************************************************
// * sample_i2dxxml.i2dspt                                      *
// *                                                            *
// * Sample script for the i2dxXML (reading and writing of xml  *
// * files) plugin                                              *
// * REQUIRES THE INSTALLED PLUGIN TO COMPILE AND RUN!          *
// *                                                            *
// * Press F9 to execute the code or F7/F8 to debug it          *
// *                                                            *
// * Contact www.norpa.eu if the plugin is required but missing *
// **************************************************************
 
{$I i2dxXML}
 
procedure RecurseNodes(ParentNodeName: String);
var
  i, j: Integer;
  s: String;
 
begin
  j := i2dxXMLNodeCount(ParentNodeName);
 
  for i := 0 to j - 1 do begin
    s := i2dxXMLNodeNameByIndex(ParentNodeName, i)
 
    i2dDebugOut(s + ': ' + i2dxXMLGetNodeValue(s));
    RecurseNodes(s);
  end;
end;
 
var
  sXMLFileName: String;
 
begin
  sXMLFileName := i2dInputBox('XML-Filename', 'XML-Filename to parse:', '');
  if sXMLFileName = '' then
    i2dCancelProcess('No filename entered');
 
  i2dxXMLLoadDocumentFromFile(sXMLFileName);
  RecurseNodes(i2dxXMLRootNodeName);
end.

Atom

powered by Nibbleblog