类型的表达式必须是布尔

我得到了表达错误消息类型我是boolean..how我想解决这个问题类型的表达式必须是布尔

function GetModeratedFormName(sSourceModuleName: String) : TForm; 
begin  

    if AdditionalModerator(sSourceModuleName) then exit; 
    if sSourceModuleName = 'frmCI' then 
     RESULT := frmCI; 
end;

来源

2010-07-14 zizil

@zizil，德尔福展示你到底上发生了什么行代码的错误。下一次仔细查看该行，如果您需要询问有关错误消息的问题，请在问题中标注注释。 – 2010-07-14 04:31:27

@zizil，显然这个问题是你至极功能AdditionalModerator不返回一个boolean类型。

你必须写这样的事情

function AdditionalModerator(Param1:String) : Boolean; 
begin 
    // your code goes hee 
end;

来源

2010-07-14 03:15:43 RRUZ

+1，因为这是最可能的原因。 – 2010-07-14 04:25:06

即使zizil会得到一个“函数返回值”函数“可能未定义”警告，因为结果将不会在AdditionalModerator中设置返回true。 – 2010-07-15 08:06:38

类型的表达式必须是布尔

回答

相关问题