GantView成员

属性

属性 说明
Readonly 逻辑型,甘特图是否只读
SelectedTask 返回当前选定的任务
SelectedTaskIndex 返回选定任务的索引
Tasks 任务集合,Tasks最常用的方法是Add和Search

例如增加一个任务:

Dim gv As GanttView = e.Form.Controls("AddRow").GanttView
Dim tk As New Gantt.Task
gv.tasks.add(tk)
gv.SelectedTaskIndex = gv.Tasks.Count - 1

Search方法可以根据任务名或任务ID来查找任务,但是任务名会有重复,建议根据任务ID来查询。

例如在Tasks表中选定了某个数据行,希望GantView滚动到这一行对应的任务,代码为:

Dim gv As Gantt.C1GanttView = e.Form.Controls("GanttView1").GanttView
Dim
rw As Row = Tables("Tasks").Current
Dim
tk As Gantt.Task = gv.Tasks.Search(rw("TaskID"))
If
tk IsNot Nothing Then
    gv.SelectedTask = tk

End
If

Resources 一个集合,包括所有已经定义的资源,参考:用代码管理资源
ShowToolBar 逻辑型,是否显示工具栏
ChartStartDate

返回或设置甘特图滚动区域的起始日期,例如希望甘特图滚动到2024年9月16日:

Dim
gv As GanttView = e.Form.Controls("GanttView1").GanttView
gv.ChartStartDate =
New Date(2024, 09, 16)
gv.ChartFinishDate =
New Date(2024, 12, 31)

ChartFinishDate 返回或设置甘特图滚动区域的结束日期
StartDate 项目开始日期,参考:增加任务之前
StartDate 项目结束日期,参考:增加任务之前
ScheduleFrom 设置项目是从开始日期还是从完成日期开始安排任务的,参考:增加任务之前
可选值有:
ProjectStartDate:根据开始日期安排任务,所有任务必须在此日期之后开始。
ProjectFinishDate:根据结束日期安排任务,所有任务必须在此日期之前结束。
AdaptiveBarHeight 是否根据字体自动调整行高,默认为False
BarHeight 用于设置默认行高,AdaptiveBarHeight为False,此属性才会生效,例如:

Dim gv As Gantt.C1GanttView = e.Form.Controls("GanttView1").GanttView
gv.AdaptiveBarHeight =
False '这行可以不要,因为默认就是False
gv.BarHeight = 16

GridWidth 表格宽度,参考:用代码设置列
DefaultDaysOff 设置默认休息日,WeekDays型枚举,可选值有:
None: 没有休息日,天天工作
Monday:星期一休息
Tuesday:星期二休息
Wednesday:星期三休息
Thursday:星期四休息
Friday:星期五休息
Saturday:星期六
Sunday:星期日休息
Weekends:周末休息(星期六和星期日)

参考:设置默认休息日和工作时间
DefaultWorkingTimes 用于设置每天的默认工作时间,工作时间最多可分为5段(Interval_1到Interval_5)
参考:设置默认休息日和工作时间
CalendarExceptions 日历例外,也就是用于设置不遵守默认休息日和工作日安排的日期,一般用于设置国庆、中秋等法定节日。
参考:设置法定假日和调休  设置特殊日历例外
FirstDayOfWeek 设置每周的第一天
FirstMonthOfFY 
设置每个财年的第一个月
HoursPerDay 
每天工作小时数,参考:设置默认休息日和工作时间
HoursPerWeek 每周工作小时数,参考:设置默认休息日和工作时间
DaysPerMonth 每月工作天数(约),参考:设置默认休息日和工作时间
GridDateFormat 
设置甘特图数据表中的日期格式,参考:日历选项
ChartDateFormat 
设置甘特图中的日期格式,参考:日历选项
CustomCalendars 集合,包括所有自定义日历,参考: 创建自定义日历用代码创建自定义日历
BarStyles 集合,包括所有任务条默认样式,参考:设置默认样式使用代码设置样式
BarTextFont 甘特图字体,例如:

Dim gv As GanttView = e.Form.Controls("GanttView1").GanttView
gv.BarTextFont =
New Font("微软雅黑", 10)
gv.BarTextForeColor = Color.RosyBrown
BarTextForeColor 甘特图字体颜色
FixedFont 列标题字体和行号字体,例如:

Dim gv As GanttView = e.Form.Controls("GanttView1").GanttView
gv.FixedFont =
New Font("微软雅黑", 10)
gv.FixedForeColor = Color.Red
FixedForeColor 列标题和行号的字体颜色
GroupFont 分组行字体
Columns 列集合,参考:用代码设置列自定义数据列
ProgressLine 进度线,参考:显示进度线
ShowLinks 逻辑型,是否在前驱任务和后续任务之间绘制连接线
ShowNonworkingTime 逻辑型,是否用不同的颜色绘制非工作日
NonworkingTimeColor 非工作日的单元格颜色
ProjectSummary 返回或设置项目摘要任务
ShowProjectSummary 逻辑型,是否显示项目摘要任务
ShowStartFinish 
逻辑型,是否高亮显示项目开始日期和结束日期
ShowToday 逻辑型,是否高亮显示今天日期
SummaryFont 
摘要任务字体
TimeScale 时间标尺,参考:设置时间标尺用代码设置时间标尺
CellBorderColor 网格线颜色
EmptyAreaBackColor 
空白区域颜色
FixedBackColor 
列标题和行号列的背景颜色
FixedCellBorderColor
列标题和行号列的网格线颜色
GridForeColor 
表格字体颜色
GroupBackColor 
分组行背景颜色
HighlightBackColor 
焦点单元格背景颜色
HighlightForeColor 
焦点单元格字体颜色
MarqueeColor 
拖动任务条或调整任务条大小是的边框颜色
SplitterColor 
数据表和甘特图之间的分割线的颜色
StartFinishLineColor 
项目开始/结束时间线的颜色
TodayLineColor 
今日时间线的颜色
ToolbarBackColor 
工具栏的背景颜色

方法

方法 说明
ClickButton
执行内置命令,参考:调用内置命令
LoadXml
从XML文件加载,参考:保存与加载
SaveXml
保存为XML文件,参考:保存与加载
ImportFromMsProjectXml
导入微软Project格式的XML文件,参考:导入导出Project文件
ExportToMsProjectXml
导出为微软Project格式的XML文件,参考:导入导出Project文件
SetColumns 批量设置列,参考:用代码设置列
SetComboList 给自定义列设置下拉列表,参考:自定义数据列
ScrollToTask
滚动到指定任务,语法:

ScrollToTask(task,scrollToBegining)

task: 任务
scrollToBegining:可选参数,逻辑型,是否滚动到任务条的开始处


本页地址:http://www.foxtable.com/webhelp/topics/4039.htm