XMLerrs2.sml

# XMLerrs2.sml

string xmlfile$;
xmlfile$=_context.ScriptDir + "/errors.xml";

numeric errXML;
class XMLDOC dlgdoc;
errXML = dlgdoc.Read(xmlfile$);

if (errXML < 0) {
	PopupError(errXML);
	Exit();
	}

class XMLNODE dlgnode;
dlgnode = dlgdoc.GetElementByID("radiogp");

if (dlgnode == 0) {
	PopupMessage("Could not find dialog node in XML document");
	}

class GUI_DLG dlgwin;
dlgwin.SetXMLNode(dlgnode);
dlgwin.DoModal();