mit Attributen arbeiten

[billi]

Hallo,
damit wurde mir schon etwas geholfen.
Jetzt möchte ich nur das tun:

Wenn die Node thema mit dem Atrribut "xyz" vorhanden ist, dann füge den neuen Eintrag dort hinein, wenn nicht erstelle neue nude ...
Das hab ich versucht:

Code:

if xmlDoc.documentElement.selectSingleNode('/bilderdatenbank/thema[Attribut="' + athema + '"]') = True //in der Zeile liegt der Fehler "begraben"...
then
begin
for index := 0 to ListBox1.Items.Count -1 do
begin
newBild := xmlDoc.createElement('Bild');

newSub := xmlDoc.createElement('name');
newSub.text := ListBox1.Items.Strings[Index];
newBild.appendChild(newSub);

newSub := xmlDoc.createElement('text');
newSub.text := atext;
newBild.appendChild(newSub);

newThema.appendChild(newBild);
end;
end
else
newThema := xmlDoc.createElement('Thema');
newAttr := xmlDoc.createAttribute('name');
newAttr.Text := athema;
newThema.attributes.setNamedItem(newAttr);
xmlDoc.documentElement.appendChild(newThema);
for index := 0 to ListBox1.Items.Count -1 do
begin
newBild := xmlDoc.createElement('Bild');

newSub := xmlDoc.createElement('name');
newSub.text := ListBox1.Items.Strings[Index];
newBild.appendChild(newSub);

newSub := xmlDoc.createElement('text');
newSub.text := atext;
newBild.appendChild(newSub);

newThema.appendChild(newBild);
end;
xmlDoc.documentElement.appendChild(newThema);
xmlDoc.save(fAppPath + DATABASE_FNAME);

end;
end;

wär echt nett, wenn mir da jemand helfen könnte...
gruß
billi