交互式甘特图VARCHART XGantt常见问题：如何提高性能？（ActiveX版）

VARCHART XGantt正式版

暂停更新

如果对每个节点重复执行更新操作，则包含大量节点的项目可能会花费太长时间。并非每个自动更新过程都是必需的；在这种情况下，您可以暂停单个更新，处理一系列代码，然后进行最终更新。挂起和重新激活更新都可以通过SuspendUpdate方法完成，该方法在代码序列的开头设置为True，在代码序列的结尾设置为False。使用此方法可以显着提高整体性能。

示例代码

Dim dataTable As VcDataTableDim dataRecordCltn As VcDataRecordCollectionDim dataRecord As VcDataRecordSet dataTable = VcGantt1.DataTableCollection.DataTableByName("Maindata")Set dataRecordCltn = dataTable.DataRecordCollectionVcGantt1.SuspendUpdate (True)For Each dataRecord In dataRecordCltn dataRecord.DataField(4) = "10" dataRecord.UpdateDataRecordNextVcGantt1.SuspendUpdate (False) 

您还可以通过SuspendUpdate方法加快链接的更新过程。

如果您在大型项目中修改表格格式，则还应使用SuspendUpdate方法。

示例代码

Private Sub ModifyTable_Click() Dim formatCol As VcTableFormatCollection Dim aFormat As VcTableFormat Dim index As Integer VcGantt1.SuspendUpdate True Set formatCol = VcGantt1.Table.TableFormatCollection For Each aFormat In formatCol For index = 1 To aFormat.NoOfColumns aFormat.FieldBackgroundColor(index) = vbGreen aFormat.FieldFontBody(index) = vcBold aFormat.FieldFontColor(index) = vbRed aFormat.FieldFontName(index) = "Arial" aFormat.FieldFontSize(index) = 14 aFormat.FieldHorAlignment(index) = vcHorCenterAligned Next Next VcGantt1.SuspendUpdate FalseEnd Sub 

当您使用不等距的直方图曲线时，此方法还可以加快更新过程。

示例代码

Private Sub CommandCreateCurve_Click()Dim myCurve As VcCurveSet myCurve =VcGantt1.HistogramCollection.FirstHistogram.CurveCollection. _ CurveByName("Curve1")Dim index As IntegerDim aDate As Date'current dateaDate = DateVcGantt1.SuspendUpdate TrueFor index = 1 To 3000' move: 2h:24min aDate = aDate + 1 / 10 myCurve.SetValues aDate, indexNextVcGantt1.SuspendUpdate FalseEnd Sub 

当您使用日历时，该方法还可以加快更新过程，因为在加载节点后，对日历的修改需要大量时间，因为从那时起，对于所有节点，程序都必须检查它们是否依赖于日历。

图形
性能低下的另一个原因可能是表、节点或框字段中的图形太大或像素太多。

关于提高性能的问答，到这里就结束了，想要了解此问题的.NET版本回答，请点击下方的链接！对产品感兴趣的朋友可以下载VARCHART XGantt试用版免费体验~

相关内容推荐：

VARCHART XGantt 用户手册>>>

交互式甘特图VARCHART XGantt常见问题：如何提高性能.NET版）

想要购买VARCHART XGantt正版授权，或了解更多产品信息请点击【咨询在线客服】

标签：