Работаю с XML с помощью msxml
Код:
xmlDoc: IXMLDOMDocument;
xmlProgIdField: IXMLDOMNode;
xmlProgidList: IXMLDOMNodeList;
xmlProgNameField: IXMLDOMNode;
prodListName: string;
i:integer;
begin
xmlDoc := IXMLDOMDocument(CreateOleObject('msxml.domdocument'));
xmlDoc.load('c:\temp\1.xml');
xmlDoc.documentElement.selectSingleNode('//ESADout_CU:ESADout_CU/cat_ru:DocumentID');
showmessage( xmlProgIdField.text);
Если заданный узел найден то все ок, но так как мой xml заполняется хитрым образов-есть не обязательные теги и если они пустые то они в xml не записываются, т.е. некоторые теги могут в файлах отсутствовать..
Тут и проблема, если не найден тег, то вылетает ошибка, может можно как-то это предусмотреть? пока побошелся try/except , но думаю это не вариант