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

来源:互联网 发布:淘宝客公众号利润 编辑:程序博客网 时间:2024/05/21 06:24

_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()

 

 

原创粉丝点击