#include <CtrlLib/CtrlLib.h>
using namespace Upp;

template <class T>
class Cached : public T{
	Value val;
	bool refreshflag;
public:
	void operator<<=(Callback action) {T::operator<<=(action);}
	void operator<<=(Value data)      {refreshflag=true; val=data;}
	void SetData(Value data)          {refreshflag=true; val=data;}
	Value GetData()                   {return val;}
	Value operator~()                 {return val;}
	void Apply()                      {if(refreshflag) T::SetData(val);}
	bool IsChanged()                  {return refreshflag;}
};

class guitest : public TopWindow {
public:
	typedef guitest CLASSNAME;
	Cached<EditIntSpin> s;
	guitest(){
		s.SetRect(0,0,50,24);
		Add(s);
		s<<=0;
		s.Apply();
	}
	void LeftDown(Point p,dword keyflags){
		s<<=int(~s)+1;
	}
	void RightDown(Point p,dword keyflags){
		s.Apply();
	}
};

GUI_APP_MAIN{
	guitest().Run();
}