From 0be07986524d159f20c37252bbebc4ac6d38dc72 Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Mon, 22 Aug 2022 21:01:27 +0000 Subject: [PATCH] tvplanit: Add initial (empty) version of TVpGanttView. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8414 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/tvplanit/laz_visualplanit.lpk | 10 ++++++++- components/tvplanit/source/vpganttview.pas | 26 ++++++++++++++++++++++ 2 files changed, 35 insertions(+), 1 deletion(-) create mode 100644 components/tvplanit/source/vpganttview.pas diff --git a/components/tvplanit/laz_visualplanit.lpk b/components/tvplanit/laz_visualplanit.lpk index 9358d53e2..d1396ce56 100644 --- a/components/tvplanit/laz_visualplanit.lpk +++ b/components/tvplanit/laz_visualplanit.lpk @@ -32,7 +32,7 @@ Portions created by TurboPower Software Inc. are Copyright (C) 2002 TurboPower S Contributor(s): "/> - + @@ -297,6 +297,14 @@ Contributor(s): "/> + + + + + + + + diff --git a/components/tvplanit/source/vpganttview.pas b/components/tvplanit/source/vpganttview.pas new file mode 100644 index 000000000..6e9c52248 --- /dev/null +++ b/components/tvplanit/source/vpganttview.pas @@ -0,0 +1,26 @@ +unit VpGanttView; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, SysUtils, + VpBaseDS, VpData; + +type + TVpGanttView = class(TVpLinkableControl) + private + + protected + + public + + published + + end; + +implementation + +end. +