You've already forked lazarus-ccr
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
This commit is contained in:
@ -32,7 +32,7 @@ Portions created by TurboPower Software Inc. are Copyright (C) 2002 TurboPower S
|
|||||||
|
|
||||||
Contributor(s): "/>
|
Contributor(s): "/>
|
||||||
<Version Major="1" Minor="7"/>
|
<Version Major="1" Minor="7"/>
|
||||||
<Files Count="66">
|
<Files Count="68">
|
||||||
<Item1>
|
<Item1>
|
||||||
<Filename Value="source\vpbase.pas"/>
|
<Filename Value="source\vpbase.pas"/>
|
||||||
<UnitName Value="VpBase"/>
|
<UnitName Value="VpBase"/>
|
||||||
@ -297,6 +297,14 @@ Contributor(s): "/>
|
|||||||
<Filename Value="source\vpimportpreview_vcard.pas"/>
|
<Filename Value="source\vpimportpreview_vcard.pas"/>
|
||||||
<UnitName Value="VpImportPreview_VCard"/>
|
<UnitName Value="VpImportPreview_VCard"/>
|
||||||
</Item66>
|
</Item66>
|
||||||
|
<Item67>
|
||||||
|
<Filename Value="source\vpganttview.pas"/>
|
||||||
|
<UnitName Value="vpganttview"/>
|
||||||
|
</Item67>
|
||||||
|
<Item68>
|
||||||
|
<Filename Value="source\vpganttview.pas"/>
|
||||||
|
<UnitName Value="vpganttview"/>
|
||||||
|
</Item68>
|
||||||
</Files>
|
</Files>
|
||||||
<CompatibilityMode Value="True"/>
|
<CompatibilityMode Value="True"/>
|
||||||
<i18n>
|
<i18n>
|
||||||
|
26
components/tvplanit/source/vpganttview.pas
Normal file
26
components/tvplanit/source/vpganttview.pas
Normal file
@ -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.
|
||||||
|
|
Reference in New Issue
Block a user