Das habe ich auch schon gefunden, nur helfen tut es nicht wirklich. Ich habe es jetzt so:
Delphi-Quellcode:
function TConfigFile.GetIsYearConfigured: Boolean;
var
ChildNodes: IXMLDOMNodeList;
SubNode: IXMLDOMNode;
Attr: IXMLDOMAttribute;
i: Integer;
s:
String;
begin
result := False;
if FYear <> '
'
then
begin
ChildNodes := FXmlDoc.documentElement.selectNodes('
zeitraum');
for i := 0
to ChildNodes.length - 1
do
begin
SubNode := ChildNodes.item[i];
s := FxmlDoc.documentElement.getAttribute('
jahr');
ShowMessage(s);
end;
end
else
raise Exception.Create(rsNoYear);
end;
... aber das funktioniert auch nicht:
Zitat:
Could not convert variant of type (Null) into type (String)