Ejemplo n.º 1
0
//---------------------------------------------------------------------------
// Helper functions:
//---------------------------------------------------------------------------
_di_IXMLDocument __fastcall NewXMLMessage(AnsiString RootTag)
{
	_di_IXMLDocument result = NewXMLDocument();
	result->Options >> doAttrNull;

	result->Encoding = L"UTF-8";
	result->Options << doAttrNull;
	//result->Options << doNodeAutoIndent;

	result->AddChild(RootTag);

	return result;
}
Ejemplo n.º 2
0
Parser::Parser(String path)
{
	try
	{
	   m_operator = true;
	   m_predicate = true;
	   m_xml = NewXMLDocument();
	   m_xml->LoadFromFile(path);
	   m_xml->Active = true;
	}catch(...)
	{
	   ShowMessage("Some problem with xml file");
	}
}