XML Nodevalue liefert leeres Ergebnis

[Alfonso]

Hallo,
habe folgend Funktion:

Delphi-Quellcode:

function XMLGetValue(XMLNode: IDOMNode; Path: string): string;
var
  node: IDOMNode;
begin
  node := (XMLNode as IDOMNodeSelect).selectNode(Path);
  if node = nil then
    result := ''
  else
    result := node.nodeValue;
end;

Node.Nodevalue liefert immer '' zurück, obwohl node.nodeName mir den richtigen Node anzeigt. Hier ein Beispiel XML:

Code:

<Kunde>
  <Nachname>Abbenseth</Nachname>
  <Vorname>Peter</Vorname>
  <Geschlecht>M</Geschlecht>
</Kunde>

Beim Aufruf von XMLGetValue(XMLnode,'Vorname') erwarte ich als Ergebnis Peter.

Was ist falsch? Wie kann man es anders machen?

Danke im Voraus