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

Question

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

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;