Forum: Algorithmen, Datenstrukturen und Klassendesign
by MyRealName,
12. Okt 2023
Danke, das geht, nutze allerdings
LOrder.OwnerDocument.SaveToFile...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by MyRealName,
6. Sep 2023
Ich habe jetzt im Endeffekt eine lauffähige rekursive Funktion, die den Namen des Unterlementes an den Parent-Namen (mit Punkt getrennt) anhängt. Das ganze wird
procedure IterateNode(ARoot: IXMLNode; ACurrentNodeName: String = '');
var
lChild: IXMLNode;
lNodeName: String;
begin
lNodeName := IfThen(ACurrentNodeName <> '', ACurrentNodeName + '.', '');
lChild :=...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by MyRealName,
6. Sep 2023
Danke, ich schau mal daheim in der Installation, weil im Büro sehe ich es nicht und GetIt funktioniert hier nicht (wohl irgendwas im Proxy falsch konfiguriert).
Forum: Algorithmen, Datenstrukturen und Klassendesign
by MyRealName,
6. Sep 2023
Ich habe eine Pro-Version von Delphi (vom Arbeitgeber gestellt), da gibt es diesen Punkt nicht... :(
Forum: Algorithmen, Datenstrukturen und Klassendesign
by MyRealName,
6. Sep 2023
So, habe jetzt rausgefunden, dass ich ein Element wie das "<ce_text_list/>" über IsTextElement=False + ChildNodes.Count = 0 rausfiltern kann (haben ja keinen Wert).
Die Unterlisten gehen dann über IsTextElement=False + ChildNodes.Count > 0