Создание и запись XML файлов

[II_Dimit_II]

помогите создать XML файл в bilder, а так же запись данных и чтение из него

[Krok27]

Используем TXMLDocument.

  TXMLDocument* Config = new TXMLDocument(Application);
	Config->FileName = FileName;
	Config->DOMVendor = GetDOMVendor("MSXML");
	Config->Active = true;
	Config->Encoding = "UTF-8";
        //Это открыли файл.
        Config->DocumentElement // корневой узел
        Config->DocumentElement->ChildNodes // дочки корневого
        Config->DocumentElement->ChildNodes->GetCount() // количество
_di_IXMLNode ParentNode = Config->DocumentElement->ChildNodes->FindNode(NameNode); // поиск узла
ParentNode->ChildNodes->Get(IndexNode)->Text; //значение

_di_IXMLNode Node  = ParentNode->AddChild(NameNode); // добавить
Node->Text = ValueNode; // значение
Node->SetAttribute("Имя", value); // установить аттрибут
Node->GetAttrubute("Имя"); //получить аттрибут


Config->SaveToFile(FileName); // сохранить

[II_Dimit_II]

Мммм.....проблемка в том, что у меня данные берутся из StringGrid и загружаются туда же!!! не знаю как сделать(((

Вот код сохранения, но после его использования при выходе из программы вылетает ошибка!!!!!!!!!!!!!
//////////////////////////////////////////////////////////////////////////////////////////////////

void __fastcall TForm1::N8Click(TObject *Sender)
{ 
_di_IXMLDocument XMLDocument = NewXMLDocument();
  try{
	XMLDocument->Active = True;
	XMLDocument->Encoding = "UTF-16";
	XMLDocument->Options = XMLDocument->Options << doNodeAutoIndent;

	_di_IXMLNode nodElement = XMLDocument->CreateElement(L"data", L"");
	XMLDocument->ChildNodes->Add(nodElement);
	for (int i = 0; i < StringGrid1->RowCount; i++)
	{
	IXMLNode *nodNew = XMLDocument->ChildNodes->Last()->AddChild(L"user");

	String firma=StringGrid1->Cells[0][i+1];
	nodNew->SetAttribute("firma", firma);
	String model=StringGrid1->Cells[1][i+1];
	nodNew->SetAttribute("model", model);
	String plata=StringGrid1->Cells[2][i+1];
	nodNew->SetAttribute("plata", plata);
	String OZY=StringGrid1->Cells[3][i+1];
	nodNew->SetAttribute("OZY", OZY);
	String videokarta=StringGrid1->Cells[4][i+1];
	nodNew->SetAttribute("videokarta",videokarta);
	String disk=StringGrid1->Cells[5][i+1];
	nodNew->SetAttribute("disk",disk);
	String pitanie=StringGrid1->Cells[6][i+1];
	nodNew->SetAttribute("pitanie",pitanie);
	String cena=StringGrid1->Cells[7][i+1];
	nodNew->SetAttribute("cena",cena);
	}
	XMLDocument->SaveToFile("katalog.txt");
}
__finally {FreeAndNil(&XMLDocument); delete XMLDocument; }
}

[Aibolit]

Всем доброй ночи. Ребята извините, что поднимаю данную тему, но у меня вопросик:
Как получить значение атрибутов у родительского узла? Дочерних я могу получить.
например имеется xml;

<?xml version="1.0" encoding="UTF-8"?>
<Settings WinDir="C:\WINDOWS\" OS_MjVer="5" OS_MiVer="1" OS_Build="2600" BootMode="0" OS_CSDV="Service Pack 3">
	<Connection>
		<ConnectionString Value="Provider=SQLOLEDB.1;Data Source=s42;Initial Catalog=az;Integrated Security=;"/>
		<User Value="it-ir"/>
	</Connection>
	<WindowParams Left="242" Top="164"/>
	<Port PortNum="COM1" Speed="9600" Parity="NOPARITY" StopBit="1" ByteSize="8" SleepTime="1000"/>
	<DataParams GskNum="2"/>
</Settings>

Мне нужно получить значения родительского узла (Settings) значение атрибута WinDir, то есть

C:\WINDOWS\

Заранее благодарен.

[Smitt&Wesson]

Сообщение от Krok27

Используем TXMLDocument.

А инклюд какой? Если не секрет.

[Rififi]

Aibolit

Как получить значение атрибутов у родительского узла?

примерно так:

#include <Windows.h>
#include <Objbase.h>

#import <MsXml3.dll>
#include <iostream>

CoInitialize(NULL);
try
{
	MSXML2::IXMLDOMDocumentPtr xml(__uuidof(MSXML2::DOMDocument));
	xml->load(L"zzz.xml");
	_bstr_t windir = xml->selectSingleNode(L"/Settings/@WinDir")->nodeValue;
	std::wcout << (const wchar_t*) windir;
}
catch (const _com_error& e)
{
}

[Aibolit]

Сообщение от Smitt&Wesson

А инклюд какой? Если не секрет.

Да использую

TXMLDocument *XMLDocument1;

это в .h
.cpp

_di_IXMLDocument xmlDoc;
   IXMLNode *xmlRoot;
   _di_IXMLNode NodeList;

все инклюды

#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <msxmldom.hpp>
#include <XMLDoc.hpp>
#include <xmldom.hpp>
#include <XMLIntf.hpp>
#include <ComCtrls.hpp>
#include <Dialogs.hpp>

Компилятор RadStudio XE.

Rififi а вы написали код случаем не для визуал студио???

[Smitt&Wesson]

Увы, но в Buildere таких файлов нет. Печально.

[Rififi]

Aibolit

попробуй сначала скомпилировать как есть
если это поделие не умеет задницу лизать быть совместимым с micorosft, тогда это вообще клиника.

[Aibolit]

Сообщение от Rififi

Aibolit

попробуй сначала скомпилировать как есть
если это поделие не умеет задницу лизать быть совместимым с micorosft, тогда это вообще клиника.

По про бывал. Ошибки

[BCC32 Error] E2209 Unable to open include file ' MsXml3.tlh'
[BCC32 Error] E2090 Qualifier 'MSXML2' is not a class or namespace name
  Full parser context
    Unit1.cpp(64): parsing: void _fastcall TForm1::Button2Click(TObject *)
[BCC32 Error] Unit1.cpp(70): E2451 Undefined symbol '_bstr_t'
  Full parser context

Но я нашел решение завтра постараюсь выложить его.

Но у меня возник другой вопрос как отловить ошибку при загрузки файла .xml когда он битый с возможностью ее исправления.
в основном ошибка одна и та же, нет пробела между двумя атрибутами.

Общую ошибку я отлавливаю блоком

try{}
catch(...) //вот здесь надо поставить имя или указатель отлавливаемой ошибки, но я его не знаю.

Но видно при загрузки страницы браузером, он ее как то уловливает, даже показывает где ошибка строка номер символа.