XML Attribut

[value is NULL]

Hi Delphianer

Ich stehe leider vor einem großen Problem. Ich habe folgendes XML:

Code:

<accdevlist>
  <accdev accdevindex="1">
    <call controllingresource="bla" />
    <channel rpsmoduleindex="102" devindexonrps="1" />
    <recorder rpsmoduleindex="102" devindexonrps="1" />
    <dtmfdetector rpsmoduleindex="102" devindexonrps="1" />
    <tonedetector rpsmoduleindex="102" devindexonrps="1" />
  </accdev>
  <accdev accdevindex="2">
    <call controllingresource="channel" />
    <channel rpsmoduleindex="102" devindexonrps="2" />
    <recorder rpsmoduleindex="102" devindexonrps="2" />
    <dtmfdetector rpsmoduleindex="102" devindexonrps="2" />
    <tonedetector rpsmoduleindex="102" devindexonrps="2" />
  </accdev>
  <accdev accdevindex="3">
    <call controllingresource="test" />
    <channel rpsmoduleindex="102" devindexonrps="3" />
    <recorder rpsmoduleindex="102" devindexonrps="3" />
    <dtmfdetector rpsmoduleindex="102" devindexonrps="3" />
    <tonedetector rpsmoduleindex="102" devindexonrps="3" />
  </accdev>
  <accdev accdevindex="4">
    <call controllingresource="channel" />
    <channel rpsmoduleindex="102" devindexonrps="4" />
    <recorder rpsmoduleindex="102" devindexonrps="4" />
    <dtmfdetector rpsmoduleindex="102" devindexonrps="4" />
    <tonedetector rpsmoduleindex="102" devindexonrps="4" />
  </accdev>
</accdevlist>

mit folgendem Code frage ich ab, wieviele accdevs es prinzipiell gibt:

Delphi-Quellcode:

var
  cfg : IXMLDocument;
  acc : IXMLNode;
  i : integer;

begin

CoInitialize(nil);
cfg := LoadXMLDocument(ctcfg);
acc := cfg.DocumentElement.ChildNodes.First.ChildNodes.First;

while not (acc = nil) do begin
         i := i + 1;
         acc := acc.NextSibling;
end;
debug(inttostr(i)   + ' found!');

Das funktioniert ja prima, ABER ich muss mir jetzt noch zusätzlich auslesen welcher accdevindex welche controllingresource hat.
dh. accdevindex 1 = controllingresource bla! Da ich leider mit XMLDom keine Erfahrung habe und ziemlichen Zeit Stress habe würde ich
die von mir oben verwendete Methode gerne verwenden, ich weiß nur nicht wie ich hier ansetze.

Wenn mir jemand helfen könnte wäre ich mehr als dankbar!!!!!!!!

LG
value is NULL