交互式甘特图VARCHART XGantt：如何计算活动结束日期（.NET版）

VARCHART XGantt是一个交互式的甘特图控件，其模块化的设计让您可以创建满足您和您的客户所需求的应用程序。（我们领先的甘特图控件VARCHART XGantt可用于.NET，ActiveX和ASP.NET应用程序。）除此之外，同时还具有一个稳定可靠的甘特图工具，在编写第一行代码之前，您就可以知道是否可以满足客户的需求。

本文主要介绍如何通过VARCHART XGantt计算活动结束日期（.NET版），想要尝试一下的朋友们可以按照教程内容操作哦~

保存结束日期的表列仍为空。可以使用VARCHART XGantt中包含的日历从“开始”和“持续时间”字段计算活动的结束。

在默认日历中，工作日（周一至周五）预先定义为活动时间，周末（周六和周日）定义为非活动时间。

您可以通过灰色背景识别图中的非活动时间。可以通过在“节点”属性页面上停用“使用日历”选项节点来关闭日历。

请注意使用时和不使用日历时的计算差异：

活动从周五开始并持续3天，如果日历被激活，活动将在星期二结束。没有日历，活动将在周日结束。

可以使用对象VcCalendar的AddDuration（...）方法计算结束日期。这需要每个活动的开始和持续时间。可以通过索引访问这些字段。在通过方法set_DataField（...）设置结束日期之后，需要调用VcNode的Update（）方法来显示修改。

示例代码VB.NET

Dim tmpCal As VcCalendar
Dim tmpDate As Date
Set tmpCal = VcGantt1.CalendarCollection.Active
tmpDate = tmpCalendar.AddDuration(node.DataField(2), node.DataField(4))
node.DataField(3) = tmpDate
node.Update()

示例代码C＃

VcCalendar tmpCal = vcGantt1.CalendarCollection.Active;
DateTime tmpDate = tmpCal.AddDuration((DateTime)node.get_DataField(2),
 Convert.ToInt32(node.get_DataField(4)));
node.set_DataField(3, tmpDate);
node.Update();

通过鼠标交互创建或修改的活动的开始和结束日期将自动置于活动时间。

相反，API或编辑对话框设置的日期可以放置在非工作时间。

通过计算生成的日期始终处于工作时间。

为了确保API设置的日期处于工作时间，需要从结束日期和活动持续时间计算开始日期。

示例代码VB.NET

tmpDate = tmpCal.AddDuration(node.DataField(3),
 (-1) * node.DataField(4))
node.DataField(2) = tmpDate

示例代码C＃

tmpDate = tmpCal.AddDuration((DateTime)node.get_DataField(3),(-1) *
Convert.ToInt32(node.get_DataField(4)));
node.set_DataField(2, tmpDate);

为了保持数据的一致性，丢失或负的持续时间应视为不正确，并重置为0。如果缺少开始日期，则无法计算结束日期。代码在名为SetNodeEndDate（...）的单独方法中恢复。

示例代码VB.NET

Private Sub SetNodeEndDate(ByVal node As VcNode)
 'Avoid empty duration or negative duration
 If node.DataField(4) = "" Or node.DataField(4) < 0 Then
 node.DataField(4) = "0"
 End If
 'Start date empty then end date should also be empty
 If node.DataField(2) = "31.12.1899 00:00:00" Then
 node.DataField(3) = ""
 Else
 'Precondition is property page nodes
 '"Assign calendar to nodes" must be true
 Dim tmpCal As VcCalendar
 tmpCal = VcGantt1.CalendarCollection.Active
 Dim tmpDate As DateTime
 tmpDate = tmpCal.AddDuration(node.DataField(2), node.DataField(4))
 node.DataField(3) = tmpDate
 'Start date only in active times 
tmpDate = tmpCal.AddDuration(node.DataField(3),
 (-1) * node.DataField(4))
 node.DataField(2) = tmpDate
 node.Update()
 End If
End Sub

示例代码C＃

private void SetNodeEndDate(VcNode node)
 {
 // Avoid empty duration or negative duration
 if ((string) node.get_DataField(4) == "" ||
 Convert.ToInt32(node.get_DataField(4)) < 0)
 node.set_DataField(4,"0");

 // Start Date empty then end date should also be empty
 if (node.get_DataField(2).ToString() == "31.12.1899 00:00:00")
 node.set_DataField(3,"");
 else
 {
 // Precondition in property page nodes
 // "Assign calendar to nodes" must be true
 VcCalendar tmpCal = vcGantt1.CalendarCollection.Active;

 DateTime tmpDate = tmpCal.AddDuration(
 (DateTime)node.get_DataField(2),
 Convert.ToInt32(node.get_DataField(4)));
 node.set_DataField(3, tmpDate);

 // start date only in active times
 tmpDate = tmpCal.AddDuration((DateTime)node.get_DataField(3),
 (-1) * Convert.ToInt32(node.get_DataField(4)));
 node.set_DataField(2, tmpDate);
 node.Update();
 }
 }

需要计算日期：

1、活动结束后

2、通过数据编辑对话框或就地编辑器修改日期或持续时间之后

3、API修改活动值后

然而，在通过鼠标交互进行修改之后，不需要启动计算，因为在这种情况下，将自动执行内部计算。

可以通过VcGantt对象的属性NodeCollection来设置包括所有节点的计算循环。它的代码将被添加到事件Form1_Load（...）的末尾。

示例代码VB.NET

'Calculate end date for all nodes
Dim node As VcNode
For Each node In VcGantt1.NodeCollection
 SetNodeEndDate node
Next

示例代码C＃

// Calculate end date for all nodes
foreach (VcNode node in vcGantt1.NodeCollection)
 {
 SetNodeEndDate(node);
 }

VcNodeModified事件可以拾取用户引起的数据更改。添加的方法调用将计算结束日期。

示例代码VB.NET

Private Sub VcGantt1_VcNodeModified(ByVal sender As Object, ByVal e As
NETRONIC.XGantt.VcNodeModifiedEventArgs) Handles VcGantt1.VcNodeModified
 SetNodeEndDate(e.Node)
End Sub

示例代码C＃

private void vcGantt1_VcNodeModified(object sender,
NETRONIC.XGantt.VcNodeModifiedEventArgs e)
 {
 SetNodeEndDate(e.Node);
 }

如果API更改了数据值，则必须显式调用方法SetNodeEndDate（...）。

标签：node,SetNodeEndDate,示例,XGantt,甘特图,tmpDate,日期,VARCHART,DataField
来源： https://blog.51cto.com/14467432/2433387