以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  绘制的日历  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53448)
--  作者：shanmao
--  发布时间：2014/7/8 11:21:00
--  绘制的日历
通过表绘制的日历，怎样才能取出每天的日期呢？比如当我在日历中随便单击哪一天，控件Label都能自动显示出单击的那天日期。
--  作者：Bin
--  发布时间：2014/7/8 11:36:00
--  
e.form.controls("Label1").text = Tables("表A").current(Tables("表A").Colsel)
--  作者：有点甜
--  发布时间：2014/7/8 11:36:00
--  

 看了一下，无法做到。

 

 方法一：根据drawcell的规则，去计算获取对应单元格是什么值；

 

 方法二：在单元格里存储对应的日期值，你可以在drawcell那里直接给单元格赋值；

 

 方法三：利用SetError给单元格赋值，取值的时候，取对应单元格的GetError
--  作者：Bin
--  发布时间：2014/7/8 11:37:00
--  
写在表的AfterSelChange
 if froms("窗口1").Opened then

froms("窗口1").controls("Label1").text = Tables("表A").current(Tables("表A").Colsel)
end if
--  作者：Bin
--  发布时间：2014/7/8 11:38:00
--  
前提你指的是这种日历http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=28022&skin=0