Registry проверка на файлы

[Socolino]

Здравствуйте. Подскажите пожалуйста как реализовать если игра уже установлена в системе, при повторной установке установщик выдал. Игра уже установлена, желаете переустановить или обновить удалить?
В моём скрипте подключен стиль от .vsf

 

[Yaroslav950]

@Socolino, примерно так, если идёт речь о реестре. Может еще способы есть надо додумать,я имею виду,есть способ как сделать через сам exe, там проверка более проще, через реестр делается если игра сама требует его, старый метод,для современных игр,лучше делать через exe файл. Есть всё на форуме.

Спойлер

function InitializeSetup(): Boolean;
var
  InstallPath: String;
  Installed: Boolean;
begin
  // Проверяем наличие ключа
  Installed := RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\MyGame', 'InstallPath', InstallPath);

  if Installed then
  begin
    // Если игра установлена, предлагаем обновить или переустановить
    if MsgBox('Игра уже установлена. Хотите переустановить или обновить?', mbConfirmation, MB_YESNO) = idYes then
    begin
      Result := True;  // Переустанавливаем игру
    end
    else
    begin
      Result := False; // Прерываем установку
    end;
  end
  else
  begin
    Result := True;  // Если игра не установлена, продолжаем установку
  end;
end;
[/SPOILER]