Delphi XE2 and TeeChart 9



我下载TeeChart Pro v2012 Evaluation,我正在使用Delphi XE2。我运行了我在产品中找到的演示exe,并试图重现有关甘特图的代码,更确切地说,是要拖放甘特图元素的部分。我得到以下错误:"TGantTool未声明"我在代码中找不到这个对象,知道吗?

这对我来说似乎很好。最大限度地简化鼠标拖动示例,在运行时创建所有内容,这是Gantt拖动示例的最小代码。它对你有用吗?

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)。

相关内容

  • 没有找到相关文章

最新更新