measuredev:=Root.GetElementsByTagName('datapoint');
  For I := 0 to measuredev.length do
  Begin
       Nodes := measuredev.Item[I];
       measuredev:=Nodes.childNodes;
       for j := 0 to measuredev.length - 1 do
         Memo1.Lines.Add(measuredev.item[j].text);

  End;
0
Q log 5.5
parameter set identification
0
0
Q log 5.5

measuredev:=Root.GetElementsByTagName('datapoint');
  For I := 0 to measuredev.length do
  Begin
       Nodes := measuredev.Item[I];
         Memo1.Lines.Add(Nodes.text);
  End;