Вопрос InitializeSetup выход через false через условие

[cspp]

решил сделать запрет на установку в виртуалку. как правильно перечислить несколько условий,
т.е типа array а не писать одно и тоже несколько раз. выходит что оно корректно определяет false , выдает сообщение но там где ботва выходит true и установка прдолжается ....

function InitializeSetup: Boolean;
begin

  Result := not IsAppRunning('vmtoolsd.exe');
  if not Result then  
  MsgBox('Установка на виртуальную машину невозможна.', mbCriticalError, MB_OK); 

  Result := not IsAppRunning('VBoxTray.exe');
  if not Result then
  MsgBox('Установка на виртуальную машину невозможна.', mbCriticalError, MB_OK);  


   if not FileExists(ExpandConstant('{tmp}\botva2.dll')) then ExtractTemporaryFile('botva2.dll');
   Result:=True; 
end;

 

[Krinkels]

if 1 = 1 then
    begin
        MsgBox('Один равен одному.', mbCriticalError, MB_OK);
        Result:=True;
    end
    else
    if 1 <> 2 then
    begin
        MsgBox('Один неравен двум', mbCriticalError, MB_OK);
        Result:=False;
    end;

Как то так

 

[cspp]

а, ясно я пробовал else if в одну строку.