使用_oleCalendar类添加日历到窗口中

_oleCalendar类位于Home()+'FFC'目录下的_datetime.vcx类库里，拖入到窗口中，右击，点“生成器”，在窗口中的“Field name to bind calendar”处填写要将Calendar绑定的数据库字段名，这样使用时选择好时间，会自动地更新该字段。

例：
数据库名称为table1，里面有一个logdate来与calendar绑定，如果该字段为空，Calendar初始化的时候会提示错误，所以在此之前先插入一条记录。

INSERT INTO table1 VALUES(DATE())    &&新增一个当天日期记录
frmCalendar = CREATEOBJECT('Form')   &&创建一个表单
frmCalendar.newobject('oleCalendar','_oleCalendar','c:\foxpro\ffc\_datetime.vcx')  &&表单中新加入一个calendar对象
WITH frmCalendar.oleCalendar
 .date_column = 'table1.logdate'     &&指定与Calendar绑定的字段
 .refreshDisplay()    &&使用date_column中的日期来更新calendar的显示
 .backcolor = thisform.BackColor
 .visible = .T.
 .Height = 130
 .width = 307
ENDWITH

WITH frmCalendar
 .autocenter = .T.
 .Borderstyle = 2
 .Maxbutton = .F.
 .MinButton = .F.
 .Height = 130
 .width = 307
ENDWITH

frmCalendar.show(1)
thisform.Refresh()