这种形式的方法调用只允许出现类方法错误

Question

我一直收到这个错误。在FGetZoneData上，我有：

var
   SelectedDept: String;
implementation
procedure TFGetZoneDept.GetClick1(Sender: TObject);
var
  azone: string;
  adept: string;
  bstats,
  bname,
  btop,
  bleft,
  bnumber,
  basset: string;
  machine : TMachine;
begin
  fdb.count := 0;  //keeps track of number of machines in zone
  azone := Combobox1.Text;    //gets name of zone
  adept := TfDB.GetDeptDBName(SelectedDept); //gets name of dept from a function
  fdeptlayout.ListBox1.Clear;
end;

在TFdB上，我有一个公开声明的函数：

public
    Function GetDeptDBName(name :string):String;
end;

知道为什么这不起作用吗？

Answer 1

您在类上调用方法（我假设TfDB是类名），而不是在实例上。只有类方法才能以这种方式调用。你要做的是创建一个实例，然后调用上面的方法：

var DB: TfDB;
begin
  DB := TfDB.Create(); // create an instance
  adept := DB.GetDeptDBName(SelectedDept); // call the method

请参阅E2076这种形式的方法调用只允许用于docwiki中的类方法主题。