Einzelnen Beitrag anzeigen

CalganX

Registriert seit: 21. Jul 2002
Ort: Bonn
5.403 Beiträge
 
Turbo Delphi für Win32
 
#1

XML-Werte immer wie der Erste

  Alt 30. Dez 2003, 11:25
Hi,
ich habe folgendes Problem: wenn ich in einer Schleife alle Elemente einer IXMLDOMNodeList durchlaufe, so sind ALLE Element, genau wie das Erste.
Beispielschleife, wo es auftritt:
Delphi-Quellcode:
    sXSL := '/'+IDT_ROOTNODE+'/'+IDT_PROJECTNODE+'[@'
            +IDT_NAMEATTR+'="'+pPrjData^.szName+'"]/'
            +IDT_SOURCESNODE+'/'+IDT_SOURCENODE;
    xmlSources := xmlDoc.selectNodes(sXSL);
    for j:=0 to xmlSources.length-1 do begin
      pNewSource := vstData.AddChild(pNewSourceList);
      pSourceData := vstData.GetNodeData(pNewSource);

      pSourceData^.dwMode := 2;

      sTemp := GetAttributeValue(xmlSources[i], IDT_URLATTR, '');
      pSourceData^.szURL := sTemp;
      pSourceData^.szCaption := ExtractFileName(sTemp);

      sTemp := xmlSources[i].text;
      pSourceData^.szCaption := sTemp;

      sTemp := GetAttributeValue(xmlSources[i], IDT_CODELNGATTR, '');
      pSourceData^.szCodeLang := sTemp;
    end;

{
IDT_* sind Konstanten, alle korrekt, sonst käme ja gar nichts
xmlSources ist IXMLDOMNodeList
sXSL ist ein String
pSourceData und pNewsSource sind beides Pointer
Und GetAttributeValue ist eine Funktion von sakura, die soweit allerdings stimmen müssste
}
Ich code mir hier fast einen Ast, aber ich find' den Fehler einfach nicht.

Chris
  Mit Zitat antworten Zitat