德爾福XE2和TeeChart 9

Question

我下載TeeChart Pro v2012評估，我正在與德爾福XE2。 我運行與產品一起找到的演示exe文件，並試圖重現關於甘特圖的代碼，更準確地說是拖放甘特圖元素的部分。 我收到以下錯誤：「TGanttTool未聲明」 我無法在代碼中的任何位置找到此對象，有什麼想法？

Answer 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）是他列表的頂部。