title: type of expression must be boolean
body: <p>i got an error message type of expression my be boolean..how i want to solve this problem   </p>
  
  <pre><code>function GetModeratedFormName(sSourceModuleName: String) : TForm;  
  begin      
  
      if AdditionalModerator(sSourceModuleName) then exit;  
      if sSourceModuleName = 'frmCI' then
          RESULT := frmCI;
  end;
  </code></pre>