#include <CtrlLib/CtrlLib.h>
#include <RichEdit/RichEdit.h>

using namespace Upp;

struct MyDlg : TopWindow {
	typedef MyDlg CLASSNAME;
	MyDlg()
	{
		Add(edit.SizePos());
		//String good_qtf = "[ [ [@6 Test]]]";
		String bad_qtf = "[ [ [@6 Test]&][ {{5000:5000h1; [@6 ]:: [@6 ]:: [@6 ]:: [@6 ]}}]]";
		
		RichText txt;
		{
			//edit.PasteText(ParseQTF(bad_qtf)); -> All OK
			edit.PasteText(ParseQTF(bad_qtf));// -> Exception
		}
	}
	RichEdit edit;
};

GUI_APP_MAIN
{
	MyDlg().Run();
}