Nur auslesen wenn node bestimmte werd hat

[marabu]

Herzlich willkommen in der Delphi-PRAXiS, Silence.

Du hast viele Möglichkeiten, aber ich zeige dir jetzt nur eine - basierend auf den XML-Units von Borland:

Delphi-Quellcode:

procedure TDemoForm.ButtonClick(Sender: TObject);
var
  doc: IDOMDocument;
  nl: IDOMNodeList;
  i, iRows: Integer;
  s: TStrings;
begin
  with OpenDialog do
  if Execute then
  begin
    doc := LoadXMLDocument(FileName).DOMDocument;
    with doc as IDOMNodeSelect do
      nl := selectNodes('//teilnehmer[name="Müller"]');
    iRows := 0;
    for i := 0 to Pred(nl.length) do
    begin
      s := CreateStrings(nl.item[i] as IDOMElement);
      with StringGrid do
      begin
        RowCount := Succ(iRows);
        Rows[iRows].Assign(s);
        iRows := RowCount;
      end;
      s.Free;
    end;
  end;
end;

Testdaten und ein Demo-Projekt zu deiner Inspiration habe ich angehängt. Du solltest bei Gelegenheit die von dir verwendete Delphi-Version in deinem DP-Profil ergänzen.

Freundliche Grüße vom marabu