Delphi XE2和TeeChart 9

时间:2013-02-12 15:41:17

标签: delphi delphi-xe2 teechart

我下载TeeChart Pro v2012评估版,我正在使用Delphi XE2。 我运行我发现的产品的演示exe,我试图重现关于甘特图的代码,更准确地说是拖放甘特元素的部分。 我收到以下错误:“未声明TGanttTool” 我无法在代码中的任何地方找到这个对象,任何想法?

1 个答案:

答案 0 :(得分:1)

这对我来说似乎很好。 简化鼠标拖动示例到最大值,在运行时创建所有内容,这里是使用甘特图拖动示例的最小代码。它对你有用吗?

uses VCLTee.Chart, VCLTee.GanttCh, VCLTee.TeeGanttTool;

var Chart1 : TChart;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1:=TChart.Create(Self);
  Chart1.Parent:=Self;
  Chart1.Align:=alClient;

  Chart1.View3D:=False;
  Chart1.Zoom.Allow:=False;

  with Chart1.AddSeries(TGanttSeries) as TGanttSeries do
  begin
    FillSampleValues(5);
    Marks.Visible:=True;
  end;

  (Chart1.Tools.Add(TGanttTool) as TGanttTool).Series:=Chart1[0];
end;

也许问题只出在IDE的路径中。请检查库/搜索路径中是否存在错误的引用。并检查正确的(引用TeeChart)是否在列表的顶部。