Einzelnen Beitrag anzeigen

Benutzerbild von Jasocul
Jasocul

Registriert seit: 22. Sep 2004
Ort: Delmenhorst
1.355 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Wenn ein Node kein NodeValue beinhaltet wie prüfen?

  Alt 19. Okt 2017, 07:37
Interessanterweise bin ich gestern über das gleiche Problem gestolpert.
Da ich das Auslesen der NodeValues schon vorher anders gelöst hatte, war es relativ einfach zu beheben. Ich nutze dafür eine Function:
Delphi-Quellcode:
function GetStringValue(aNode: IXMLNode; aDefault: String = ''): String;
begin
  if Assigned(aNode) then
  begin
    try
      if aNode.NodeValue <> Null then // Zur Behebung nachträglich eingebaut
      begin
        Result := aNode.NodeValue;
      end
      else
      begin
        Result := aDefault;
      end;
    except
      Result := aDefault;
    end;
  end
  else
  begin
    Result := aDefault;
  end;
end;
Die Prüfung auf Null hat das Problem bei mir behoben.
Achte darauf, dass die Null-Function aus System.Variants, verwendet wird, falls in deiner Delphi-Version noch andere Definitionen von Null hinterlegt sind.
Alternativ sollte auch die Function VarIsNull das Problem lösen können.

Falls das nicht hilft, schaue doch erstmal nach, ob der NodeName wirklich Null ist. Vielleicht liegt noch ein anderes Problem vor.
Peter
  Mit Zitat antworten Zitat