Блог

Я добавил следующий код в свой скрипт:

 [Code]
function IsSomeAppInstalled: Boolean;
begin
  Result := FileExists(ExpandConstant('{pf32}SomeAppSome.dll'));
end;

function InitializeSetup(): Boolean;
begin
   Boolean bIsInstalled := IsSomeAppInstalled();
   MsgBox('IsSomeAppInstalled: '   IntToStr(Integer(bIsInstalled)),
     mbInformation, MB_OK);
   Result := true;
end;
  

Строка

 Boolean bIsInstalled := IsSomeAppInstalled();
  

выдает ошибку

Внутренняя ошибка (20)

В чем может быть ошибка здесь?

В Pascal (Script) вы объявляете переменные, используя var ключевое слово перед фактическим кодом:

 function InitializeSetup(): Boolean;
var
  bIsInstalled: Boolean;
begin
  bIsInstalled := IsSomeAppInstalled();
  MsgBox('IsSomeAppInstalled: '   IntToStr(Integer(bIsInstalled)),
    mbInformation, MB_OK);
  Result := true;
end;