pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

TvPlanIt: Extend GanttView by hour resolution

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8937 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-10-08 22:41:21 +00:00
parent d826f29a29
commit a41f9dbdcb
5 changed files with 561 additions and 152 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/tvplanit/examples/gantt/main.pas
View File

@@ -77,6 +77,8 @@ begin
FGanttView.Datastore := VpIniDatastore1;
FGanttView.ControlLink := VpControlLink1;
FGanttView.ColHeaderAttributes.Visible := [gchMonth, gchWeek, gchDay];
// FGanttView.StartHour := h_00;
// FGanttView.EndHour := h_23;
Caption := FGanttView.Datastore.ClassName;
CheckGroup1.Checked[0] := gchMonth in FGanttView.ColHeaderAttributes.Visible;