struct Lbca: Calendar { 
	
	void LeftDouble(Point p, dword keyflags)             //rewriten
	{
	    WhenLeftDouble(p,keyflags);
	    PromptOK("ok");
	    Show(false); //close calendar
	}
	Event<Point, dword> WhenLeftDouble; 
};

class MainWin : public TopWindow
{
    public:
     Lbca ca;

    MainWin()
    {
      Add(ca.LeftPosZ(120, 236).TopPosZ(73, 156)); 
    }

};