TeEngine.pas 未找到

TeEngine.pas not found

我正在创建一个生成条形图的程序。昨天,代码编译正常 运行 没有出现故障。但是当我现在尝试 运行 它时,会发生读取地址错误。这段代码存在问题:

for K:=0 to Length(arrIncomes) - 1 do
  IncomeBarS.AddXY(arrIncomes[k].dDate,arrIncomes[k].rAmount);

在尝试查看 "AddXY" 过程的源代码时,IDE 给出错误:"Unable to locate file 'TeEngine.pas'"。 Google 帮不了我。有谁知道如何解决这一问题?我正在使用 Delphi 2010

当您没有 pas 文件而只有已编译的 DCU 时,会显示此消息。 也就是说,你没有组件的源代码。

无论如何,声明应该如下:

Function AddXY(Const AXValue,AYValue:Double; Const ALabel:String='';
                     AColor:TColor=clTeeColor):Integer; virtual;

Function AddY(Const AYValue:Double; Const ALabel:String='';
                     AColor:TColor=clTeeColor):Integer;

您的 arrIncomes 记录似乎只有金额和日期记录,因此在您的情况下,您可以使用 AddY 而不是 AddXY 函数:

for K:=0 to Length(arrIncomes) - 1 do
  IncomeBarS.AddY(arrIncomes[k].rAmount,DateToStr(arrIncomes[k].dDate));

随 Delphi 提供的免费版 TeeChart 不包含源代码。本质上,您遇到的消息就是在告诉您这一点。 TeeChart 的完整商业版本确实随源代码一起提供。

查看您的代码,问题似乎不太可能出在 TeeChart 内部。我希望可以在您的代码中找到该问题。

我正在从 Delphi 2007 (VER185) 转换为 Delphi XE6。这是我的解决方案:

{$IFDEF VER185}
  TeEngine,
{$ELSE}
  VCLTee.TeEngine, VclTee.TeeGDIPlus,
{$ENDIF}