怎么了？(表达式必须是BOOLEAN)

Question

我的代码出了什么问题？我收到这个错误:

[dcc32错误] Unit6.pas(83):E2012表达式必须是BOOLEAN

function checkver(): boolean;
begin
  //some code here
end;

function refresh(): boolean;
begin
  //some code here
end;

procedure TForm6.FormCreate(Sender: TObject);
begin
  if checkver() then
    if refresh() then  //Error is HERE!!
      //some code here
end;

(完整代码)

Answer 1

TControl(你的表单类来自哪个)有一个Refresh自己的方法,它不返回一个布尔值.该方法的范围比单元级方法的范围更接近同名,因为您在该类的方法中编写代码,因此编译器与Refresh方法绑定,而不是与refresh函数绑定.

调用<unitname>.refresh获取单元级函数而不是方法.