易语言炫彩界面库源码月历框扩展

界面库dll+模块+扩展源码
XInitXCGUI ({ }) ' 初始化界面库
程_窗口句柄 ＝ XWnd_Create (0, 0, 800, 600, L (“月历框扩展”), 0, #xc_window_style_default)
程_a ＝ 月历框_创建 (程_窗口句柄, 12, 32)
月历框_置现行日期 (程_a, 2017, 12, 31)
程_b ＝ 月历框_创建 (程_窗口句柄, 300, 32)
月历框_置现行日期 (程_b, 2018, 1, 1)
程_c ＝ 月历框_创建 (程_窗口句柄, 12, 280)
月历框_置现行日期 (程_c, 2018, 2, 1)
程_d ＝ 月历框_创建 (程_窗口句柄, 300, 280)
月历框_置现行日期 (程_d, 2018, 2, 15)
月历框_注册日期被改变事件 (程_a, &日期被改变)
月历框_注册日期被改变事件 (程_b, &日期被改变)
月历框_注册日期被改变事件 (程_c, &日期被改变)
月历框_注册日期被改变事件 (程_d, &日期被改变)
XWnd_ShowWindow (程_窗口句柄, #SW_SHOW)
XRunXCGUI ()
XExitXCGUI ()