проверять наличие атрибутов в xml-файле

[NieL]

Возникла необходимость проверять наличие атрибутов в xml-файле для определенных нодов. Хранить информацию об атрибутах, по каждому из необходимых мне нодов, пока думаю так:

TStrings.AddObject(<имя нода>, <список атрибутов (TStrings)>)

Алгоритм будет выглядеть примерно так:

// ...
for I := 0 to ChildNodes.Count - 1 do
begin
 if list_nodes_for_chk.IndexOf(ChildNodes[I].NodeName) <> -1 then
   // это нод для которого необходимо проверить наличие атрибутов
 begin
   Attrs := TStrings(list_nodes_for_chk.Objects[I]) // извлекаем список атрибутов
   // Проверка наличия атрибутов
 end;
end;
// ...

Ориентировочно необходимо будет проверять 3-5 нодов, для кажлого из которых 5-7 атрибутов. Городить десяток списков неправильно на мой взгляд. Что посоветуете?

[Аватар]

Как вариант: создать эталонный xml-файл с необходимым перечнем узлов и их атрибутов. В программе использовать его вместо TStringList. Привлекает тем, что не нужна перекомпиляция при изменении контролируемых объектов

[Аватар]

Как вариант: создать эталонный XML-файл и в программе использовать его вместо TStringList (а не TStrings). Привлекателен тем, что можно изменять информацию в эталоне без необходимости перекомпиляции

продублировал нечаянно

[maxionans]

Что посоветуете?

Посоветую изучить TXmlDocument (это из модуля XmlDoc) и использовать его для описанных целей, т.к. он и создан для работы с XML.