表达式的类型必须是布尔值

Question

我有一个错误消息类型的表达式我是boolean ..我想要解决这个问题

function GetModeratedFormName(sSourceModuleName: String) : TForm;  
begin      

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

Answer 1

@zizil，显然问题是你AdditionalModerator函数没有返回boolean类型。

你必须写这样的东西

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