- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 甘特图问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63701)
-- 发布时间：2015/1/26 19:38:00
-- 甘特图问题
帮助中的甘特图，在新增行后没有自动更新，是CaseStudy目录下的文件：编码绘制甘特图.Table的项目，
此主题相关图片如下：无标题.png
-- 发布时间：2015/1/26 19:41:00
--
重新生成一次 BuildGanttTable
-- 发布时间：2015/1/26 20:08:00
--
这样行吗？DataColChanged写
Select Case e.DataCol.Name
Case "开始日期","结束日期"
Dim dr As DataRow = e.DataRow
If dr.IsNull("开始日期") OrElse dr.IsNull("结束日期") Then
Functions.Execute("BuildGanttTable")
Else
Return
End If
End Select
-- 发布时间：2015/1/26 20:14:00
--
如果要重新生成，就要运行 Functions.Execute("BuildGanttTable")
具体我不知道你想怎样。
-- 发布时间：2015/1/26 20:25:00
--
比照CaseStudy目录下的文件：编码绘制甘特图.Table的项目做的，
此主题相关图片如下：无标题.png
弹出
此主题相关图片如下：无标题1.png
此主题相关图片如下：无标题2.png
此主题相关图片如下：无标题1.png此主题相关图片如下：无标题2.png[此贴子已经被作者于2015-1-26 20:26:51编辑过]
-- 发布时间：2015/1/26 20:27:00
--
出错例子发上来。
照着做，就不可能有问题。
-- 发布时间：2015/1/26 20:37:00
--
选择目录树时还跳出
.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2014.11.11.1
错误所在事件：全局表事件,AfterSelRangeChange
详细错误信息：
未将对象引用设置到对象的实例。
没想通这和全局表AfterSelRangeChange有什么关系，整个和甘特图相关的窗体及表中都无牵涉全局表AfterSelRangeChange的代码
-- 发布时间：2015/1/26 20:38:00
--
例子
-- 发布时间：2015/2/3 11:15:00
--
这是全局表的AFTERSELRANGE事件的代码
全部注释后正常了
\'Dim Sum As Double
\'Dim AVG As Double
\'With e.Table
\' Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
\' AVG = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
\'End With
\'StatusBar.Message3="合计:" & Sum & ""
但我又需要这段代码？请解释下原因
-- 发布时间：2015/2/3 11:17:00
--
折腾了几天，实在找不出原因，参照帮助中的例子做的，只因为上面这段代码影响